コボラーのびっくりすること

■ このスレッドは過去ログ倉庫に格納されています
1仕様書無しさん
垢版 |
2013/04/02(火) 22:46:53.57
nullという概念がない
56仕様書無しさん
垢版 |
2016/06/26(日) 18:36:04.78
>>55
その人、いいこと言ってるわ。
57仕様書無しさん
垢版 |
2016/06/26(日) 20:21:35.43
コボラーがいいこと言うわけないだろw
58仕様書無しさん
垢版 |
2016/06/26(日) 21:20:40.25
>>57
おまえ読んでものを言えよw
59仕様書無しさん
垢版 |
2016/06/26(日) 21:54:40.80
なんだコボラーじゃないのか？まぎらわしいリンク貼るなよw
2016/06/27(月) 00:09:38.07
内容も理解せずに批判だけする奴って頭の悪い人間の典型だよな
61仕様書無しさん
垢版 |
2016/06/27(月) 14:43:33.87
>>1
すごくいいことじゃないか
nullを発明した人もnullを作り出したには失敗だったと嘆いてるくらいだじ
2016/06/27(月) 17:27:40.55
>>60
古典的な釣りにひっかかるアホｗｗｗ
2016/07/11(月) 12:35:20.86
環境変数の取得方法(Cでいうgetenv)や
パラメータの取得方法(Cでいうargv)を
知らないコボラーの多いこと
2016/07/11(月) 16:16:37.40
規格にないからな。
必要もないだろうし。
2016/07/11(月) 17:34:04.67
知ってるとかなり便利だけどね
規格外ってことは拡張機能なのかな？
2016/07/11(月) 17:51:39.11
>>65
多分メーカーのOS毎に規格が全然違ってたと思う
2016/07/11(月) 19:46:36.94
>>66
なるほど
2016/08/12(金) 21:44:15.48
というかshやbatが書けない奴やそもそもそれがなんだか分からない奴が過半数いる
69仕様書無しさん
垢版 |
2016/08/25(木) 22:54:54.89
>>52
民進党はもう駄目だな。
共産党に合併吸収されてしまえ。
序に社民党もな。
70仕様書無しさん
垢版 |
2017/06/11(日) 15:54:18.69
安倍晋三どもが犯罪行為を繰り返すからな
2017/06/11(日) 15:56:07.48
>>70
たとえば？
72仕様書無しさん
垢版 |
2017/12/29(金) 21:44:15.00
誰でも簡単にパソコン1台で稼げる方法など
参考までに、
⇒　『宮本のゴウリエセレレ』 というブログで見ることができるらしいです。

グーグル検索⇒『宮本のゴウリエセレレ』

3326UZ5CYY
73仕様書無しさん
垢版 |
2018/05/22(火) 13:28:39.41
とても簡単な自宅で稼げる方法
参考までに書いておきます
グーグルで検索するといいかも『ネットで稼ぐ方法　モニアレフヌノ』

MINJT
74仕様書無しさん
垢版 |
2018/08/09(木) 20:05:50.61
>>25

その通りです
あるよ
75仕様書無しさん
垢版 |
2018/12/12(水) 10:04:26.92
新人プログラマーの先輩が、プログラムリストとにらめっこして悩んでた。
で、俺の所にやってきて「この１行が実行されてないんだ」

示す行の前を見ると、NOTE文、そしてピリオド無し・・・

「NOTEって何だ?」
説明したら、落ち込んで床に転がったｗ
76仕様書無しさん
垢版 |
2018/12/12(水) 20:02:08.14
他言語は桁数の制限がないんだな。
77仕様書無しさん
垢版 |
2018/12/12(水) 20:11:41.80
そりゃ浮動小数点数は桁数無制限だわな
78仕様書無しさん
垢版 |
2018/12/12(水) 21:48:55.35
変数定義するところで、USAGE句にPOINTERって書けば、
SET 項目名 TO NULLも出来るし、IF 項目名 = NULL等で判定も出来るぞ。

>>46
松井のCOBOL1級は、多分全商情報処理検定1級（プログラミング部門）の選択問題でCOBOLの問題を選んだって意味だと思う。
数年前まではVBとCOBOLのいずれか選択する方式だった。今ではVBはVBA、COBOLはJavaに置き換わっているがね。
あと余り計算の話だけど、引き算のループでやる人は見たこと無いが、MOD（或いはREM）を知らない人は確かに多い。
そのせいで、必要なのは割り算の余りだけで商は使わないにもかかわらず、商格納用の変数定義してDIVIDE文使う人が多い。
79仕様書無しさん
垢版 |
2018/12/14(金) 07:13:41.50
>>49
こんな風に書こうとしてたのかな？

IF A = 1
　IF B = 1
　　COMPUTE C = 1
　ELSE
　　COMPUTE C = 2
　END-IF
ELSE
　COMPUTE C = 3
END-IF.
80仕様書無しさん
垢版 |
2018/12/14(金) 20:44:16.23
むしろこう書いた方がいかにもコボラーっぽいかもｗ

EVALUATE A ALSO B
WHEN 1 ALSO 1
　COMPUTE C = 1
WHEN 1 ALSO ANY
　COMPUTE C = 2
WHEN OTHER
　COMPUTE C = 3
END-EVALUATE.
2018/12/15(土) 01:21:20.76
C = (A == 1) ? (B == 1 ? 1 : 2) : 3
2018/12/15(土) 10:29:32.51
小学生の頃はお父さんがコンピュータの会社に勤めてて自慢に思っていた。
だけど高校生になってPCもろくに触れないスマホの使い方を子供に聞く、ITに全く無知なコボラーだったと気付いたとき自分が悲しくなった。
2018/12/15(土) 13:49:48.90
>>81
まあ三項演算子ある言語で三項演算子使うならそうなるわな。
なお、実際のIT系企業ではコーディング規約ニキが三項演算子の使用を阻止してくることも多い模様。
84仕様書無しさん
垢版 |
2018/12/16(日) 03:22:41.78
システムエグゼ
苦情申し立てダイレクト窓口

代表取締役社長 酒井 博文
h-sakai@system-exe.co.jp

専務取締役 大場 康次
yohba@system-exe.co.jp
専務取締役 後藤 清孝
kgotou@system-exe.co.jp

取締役 藤林 隆司
rfujiba@system-exe.co.jp
rfujiba2@system-exe.co.jp
取締役 荻野 弘昭
h-ogino@system-exe.co.jp
取締役 新船 幸広
arafune@system-exe.co.jp
arafune_PJ@system-exe.co.jp

監査役 白銀 亨
sirokane@system-exe.co.jp
2018/12/18(火) 23:40:34.59
IDENTIFICATION DIVISION.
PROGRAM-ID. ISLEAP.
DATA DIVISION.
LINKAGE SECTION.
01 YEAR PIC 9(4).
01 LEAP-FLG PIC X(1).
PROCEDURE DIVISION USING YEAR LEAP-FLG.
IF YEAR IS NUMERIC
　EVALUATE ZERO
　WHEN FUNCTION MOD(YEAR 400)
　　MOVE '1' TO LEAP-FLG
　WHEN FUNCTION MOD(YEAR 100)
　　MOVE ZERO TO LEAP-FLG
　WHEN FUNCTION MOD(YEAR 004)
　　MOVE '1' TO LEAP-FLG
　WHEN OTER
　　MOVE ZERO TO LEAP-FLG
　END-EVALUATE
ELSE
　MOVE '9' TO LEAP-FLG
END-IF.
EXIT PROGRAM.
86仕様書無しさん
垢版 |
2018/12/20(木) 10:34:50.30
　COMPUTE C = 1

コボラーとしてはこの書き方にものすごい無駄を感じる。
なぜかというと、アセンブラではこれが

ZAP　　　C，＝P'0'
ZAP　　　W1,＝P'1’
AP　　　　C,
87なんか勝手に書き込みが動作してしまった・・・
垢版 |
2018/12/20(木) 10:39:18.42
ZAP　　　C，＝P'0'
ZAP　　　W1,＝P'1’
AP　　　　W2,W1
ZAP　　　C,W2

とコーディングされるのだ。

MOVE　０　TO　C　ならば、

ZAP　　　C，＝P'0'

の１行だけとなる
88誤動作ついでに１行消えた
垢版 |
2018/12/20(木) 10:45:01.21
ZAP　　　C，＝P'0'
ZAP　　　W1,＝P'1’
ZAP　　　W2,＝P'0'
AP　　　　W2,W1
ZAP　　　C,W2

だな、たぶん・・・
89仕様書無しさん
垢版 |
2018/12/20(木) 13:14:07.05
LOW-VALUE= null だけど、では
HIGH-VALUEに相当するのは何?
2018/12/20(木) 22:31:59.86
例えばHPを30回復するとき、

　IF CURRENT-HP + 30 <= MAX-HP
　　COMPUTE CURRENT-HP = CURRENT-HP + 30
　ELSE
　　MOVE MAX-HP TO CURRENT-HP
　END-IF.

よりも

　IF CURRENT-HP + 30 <= MAX-HP
　　COMPUTE CURRENT-HP = CURRENT-HP + 30
　ELSE
　　COMPUTE CURRENT-HP = MAX-HP
　END-IF.

とCOMPUTEに統一して書きたい。

　COMPUTE CURRENT-HP = FUNCTION MIN((CURRENT-HP + 30) MAX-HP).

と書くのが一番いいかも知れんが。
2018/12/21(金) 00:38:35.36
Rubyだったら
current_hp = (current_hp + 30).clamp(0, max_hp)
みたいなコードですか？
2018/12/23(日) 19:00:18.84
>>91
Ruby触ったことないから調べてみたけど、
同じことをminとmax使ってやろうとすると、
current_hp = [[0, (current_hp + 30)].max, max_hp].min
になるのかな？　これだとかなり分かりにくくなるから、clampは便利だね。
HPを回復するときは下限の判定は要らないけど、
ダメージを受けたときと回復するときを共通のロジックにするなら、
Rubyのclampみたいな機能が無い場合はmaxとminの合わせ技にせざるを得ない。
2018/12/26(水) 21:23:54.23
>>89
データ型による
2019/04/29(月) 11:27:24.55
Pythonで、aをbで割った余りだけが必要で商は不要なときに、わざわざ
　q, r = divmod(a, b)
と書くことは普通せず、
　r = a % b
と書くのが普通だろう。

しかし、COBOLだとAをBで割った余りだけが必要で商は不要なときでも、
　DIVIDE A BY B GIVING Q REMAINDER R.
と書くことが多く、
　COMPUTE R = FUNCTION MOD(A B).　或いは　MOVE FUNCTION MOD(A B) TO R.
と書くことはむしろ少ない。
2019/04/29(月) 16:58:16.05
そもそもの話、商が不要で余りだけが必要なケースはCOBOLのシステムでは無い
だが逆は普通にある
2019/04/29(月) 18:02:48.31
>>95
> 商が不要で余りだけが必要なケースはCOBOLのシステムでは無い
そうかな？　そんなこと無いと思うけど。
2019/04/29(月) 21:22:07.61
うるう年判定とか偶数・奇数判定ってCOBOLじゃあんまりやらないのかな。
特に後者は1行当たり2件分表示する形式の帳票を作るときに、
奇数なら左側、偶数なら右側に編集するとかありがちだと思うけど。
　IF (-1) ** N = 1
　　（偶数のときの処理）
　ELSE
　　（奇数のときの処理）
　END-IF.
でもいいけどね。
2019/04/30(火) 01:25:28.19
帳票は書式でそういう設定をするのが普通だし
閏年の処理は自分で作るべきではない
2019/04/30(火) 09:25:05.96
COBOLのコーディングで四捨五入や丸め処理で価を認めるのは見かけるけど、余りだけ求めるのは見たことがないな
どういう想定で必要なんだろうか
2019/08/13(火) 19:50:18.57
>>8
がっ！
2019/08/13(火) 19:51:08.52
六年越しでついに取ったよ
2019/08/13(火) 21:50:35.99
ﾇﾙﾎﾟ
2019/10/26(土) 16:12:26.09
うるう年判定は、テーブルかファイル参照してたかな？
104仕様書無しさん
垢版 |
2019/10/26(土) 16:48:01.79
EVALUATE TRUE
WHEN FUNCTION MOD(YEAR 4) = ZERO
　AND FUNCTION MOD(YEAR 100) NOT = ZERO
WHEN FUNCTION MOD(YEAR 400) = ZERO
　（閏年の場合の処理）
WHEN OTHER
　（平年の場合の処理）
END-EVALUATE.

でよくない？
2019/10/26(土) 17:20:07.32
まぁ、それをサブルーチンにしても良いけどね
2019/10/27(日) 11:12:46.87
highvalue lowvalueがnull相当だろ？
■ このスレッドは過去ログ倉庫に格納されています
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。
ニューススポーツなんでも実況