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

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

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

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

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

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

「NOTEって何だ?」
説明したら、落ち込んで床に転がったｗ
0076仕様書無しさん
垢版 |
2018/12/12(水) 20:02:08.14
他言語は桁数の制限がないんだな。
0077仕様書無しさん
垢版 |
2018/12/12(水) 20:11:41.80
そりゃ浮動小数点数は桁数無制限だわな
0078仕様書無しさん
垢版 |
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文使う人が多い。
0079仕様書無しさん
垢版 |
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.
0080仕様書無しさん
垢版 |
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.
0082仕様書無しさん
垢版 |
2018/12/15(土) 10:29:32.51
小学生の頃はお父さんがコンピュータの会社に勤めてて自慢に思っていた。
だけど高校生になってPCもろくに触れないスマホの使い方を子供に聞く、ITに全く無知なコボラーだったと気付いたとき自分が悲しくなった。
0083仕様書無しさん
垢版 |
2018/12/15(土) 13:49:48.90
>>81
まあ三項演算子ある言語で三項演算子使うならそうなるわな。
なお、実際のIT系企業ではコーディング規約ニキが三項演算子の使用を阻止してくることも多い模様。
0084仕様書無しさん
垢版 |
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
0085仕様書無しさん
垢版 |
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.
0086仕様書無しさん
垢版 |
2018/12/20(木) 10:34:50.30
　COMPUTE C = 1

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

ZAP　　　C，＝P'0'
ZAP　　　W1,＝P'1’
AP　　　　C,
0087なんか勝手に書き込みが動作してしまった・・・
垢版 |
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'

の１行だけとなる
0088誤動作ついでに１行消えた
垢版 |
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

だな、たぶん・・・
0089仕様書無しさん
垢版 |
2018/12/20(木) 13:14:07.05
LOW-VALUE= null だけど、では
HIGH-VALUEに相当するのは何?
0090仕様書無しさん
垢版 |
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).

と書くのが一番いいかも知れんが。
0091仕様書無しさん
垢版 |
2018/12/21(金) 00:38:35.36
Rubyだったら
current_hp = (current_hp + 30).clamp(0, max_hp)
みたいなコードですか？
0092仕様書無しさん
垢版 |
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の合わせ技にせざるを得ない。
0094仕様書無しさん
垢版 |
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.
と書くことはむしろ少ない。
0095仕様書無しさん
垢版 |
2019/04/29(月) 16:58:16.05
そもそもの話、商が不要で余りだけが必要なケースはCOBOLのシステムでは無い
だが逆は普通にある
0096仕様書無しさん
垢版 |
2019/04/29(月) 18:02:48.31
>>95
> 商が不要で余りだけが必要なケースはCOBOLのシステムでは無い
そうかな？　そんなこと無いと思うけど。
0097仕様書無しさん
垢版 |
2019/04/29(月) 21:22:07.61
うるう年判定とか偶数・奇数判定ってCOBOLじゃあんまりやらないのかな。
特に後者は1行当たり2件分表示する形式の帳票を作るときに、
奇数なら左側、偶数なら右側に編集するとかありがちだと思うけど。
　IF (-1) ** N = 1
　　（偶数のときの処理）
　ELSE
　　（奇数のときの処理）
　END-IF.
でもいいけどね。
0098仕様書無しさん
垢版 |
2019/04/30(火) 01:25:28.19
帳票は書式でそういう設定をするのが普通だし
閏年の処理は自分で作るべきではない
0099仕様書無しさん
垢版 |
2019/04/30(火) 09:25:05.96
COBOLのコーディングで四捨五入や丸め処理で価を認めるのは見かけるけど、余りだけ求めるのは見たことがないな
どういう想定で必要なんだろうか
0103仕様書無しさん
垢版 |
2019/10/26(土) 16:12:26.09
うるう年判定は、テーブルかファイル参照してたかな？
0104仕様書無しさん
垢版 |
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.

でよくない？
■ このスレッドは過去ログ倉庫に格納されています
ニューススポーツなんでも実況