- 1 名前：デフォルトの名無しさん mailto:sage [2006/01/12(木) 00:45:25 ]
- 教育用（？）プログラムPascalの宿題をやって頂くスレ
■丸投げOK
■全く分かってない阿呆も放置しないで優しく対応
■他言語はよそ逝け( ﾟДﾟ)ｺﾞﾙｧ
■DelphiもTurbo Pascalも完全対応
【本家】
www.borland.co.jp/delphi/
【前スレ】
pc8.2ch.net/test/read.cgi/tech/1089719714
【関連スレ】
くだすれDelphi（超初心者用）その１5
pc5.2ch.net/test/read.cgi/tech/1087823906/l50
Pascal の初心者用の質問・相談所
pc5.2ch.net/test/read.cgi/tech/1009903617/l50
【Delphi初心者】今から始めるDelphi Part01
pc5.2ch.net/test/read.cgi/tech/1062422335/l50
- 879 名前：デフォルトの名無しさん mailto:sage [2009/01/28(水) 02:32:32 ]
- 我ながら改行とかインデント崩れすぎﾜﾛﾀ
- 880 名前：デフォルトの名無しさん mailto:sage [2009/01/28(水) 08:59:15 ]
- 大丈夫、環境によってはキチンとインデントされて見えてるから。
半角2文字づつ綺麗にインデントされたやつが。
- 881 名前：デフォルトの名無しさん mailto:sage [2009/01/28(水) 10:09:12 ]
- 俺のとこもちゃんとなってるよ
- 882 名前：１２３ [2009/02/11(水) 17:58:34 ]
- ４４０！を８８１で割ったときの余りをＲを求めよ。また、Ｒ2を８８１で割ったときの余りを求めよ。
- 883 名前：デフォルトの名無しさん mailto:sage [2009/02/12(木) 01:16:47 ]
- program prog1(input, output);
var i,ans:integer;
begin
ans := 1;
for i := 1 to 440 do
begin
ans := ans * i mod 881;
end;
writeln(ans);
readln;
end.
- 884 名前：１２３ [2009/02/12(木) 10:02:40 ]
- さすがです！！！任務完了！
- 885 名前：デフォルトの名無しさん mailto:sage [2009/02/13(金) 01:09:04 ]
- [1] 授業単元：Pascal
[2] 問題文(含コード&リンク)：
1から9までの数字を縦横方向に同じものが並ばないように下記の例のように並べる
並べ方が全部で何通りあるかとその並びをすべて列挙する
[3] 環境：特になし
[4] 期限： 明日まで
[5] その他の制限：
例
534681297
685293714
948367125
153472869
426538971
261759483
817945632
379126548
792814356
- 886 名前：デフォルトの名無しさん mailto:sage [2009/02/13(金) 01:25:52 ]
- 547 名前： デフォルトの名無しさん [sage] 投稿日： 2009/02/12(木) 17:07:40
Python の宿題ここで答えます Part 1
pc11.2ch.net/test/read.cgi/tech/1153585095/785
C/C++の宿題片付けます 122代目
pc11.2ch.net/test/read.cgi/tech/1232029287/542
Rubyの宿題教えてください。2限目
pc11.2ch.net/test/read.cgi/tech/1200175247/476
こんなんで数独の掲載料もらえるなら俺だって問題送りたい
- 887 名前：デフォルトの名無しさん mailto:sage [2009/02/13(金) 20:40:20 ]
- 数独の条件はそれだけじゃないだろ。
- 888 名前：デフォルトの名無しさん mailto:sage [2009/02/15(日) 13:11:36 ]
- 課題が全部列挙だとするとマジキチなサイズのレポートが出来上がる
|
 |
