- 1 名前：デフォルトの名無しさん mailto:sage [2009/12/16(水) 09:13:12 ]
- 教育用（？）プログラムPascalの宿題をやって頂くスレ
■丸投げOK
■全く分かってない阿呆も放置しないで優しく対応
■他言語はよそ逝け( ﾟДﾟ)ｺﾞﾙｧ
■DelphiもTurbo PascalもFreePascalも完全対応
■ Delphi ■
www.borland.co.jp/delphi/
■ FreePascal ■
freepascal.org/
■ Lazarus ■
www.lazarus.freepascal.org/
■ 過去スレ ■
Pascalの宿題は俺にやらせろ！！Part2
pc12.2ch.net/test/read.cgi/tech/1136994325/
Pascalの宿題は俺にやらせろ！！Part1
pc8.2ch.net/test/read.cgi/tech/1089719714/
■ 関連スレ ■
くだすれDelphi(超初心者用)その51
pc12.2ch.net/test/read.cgi/tech/1259667697/
【Delphi互換!?】FreePascal【GPL】
pc12.2ch.net/test/read.cgi/tech/1137051510/
Delphi初心者のための寺子屋
pc12.2ch.net/test/read.cgi/tech/1132756268/
- 25 名前：デフォルトの名無しさん mailto:sage [2010/01/22(金) 16:48:45 ]
- >>22
Free PASCAL用
ttp://tomiya.bne.jp/cgi-bin/upup/src/myg_l2945.txt
- 26 名前：デフォルトの名無しさん mailto:sage [2010/01/26(火) 13:48:29 ]
- >>25
ありがとうございました。
- 27 名前：ゆみこ [2010/02/04(木) 16:09:33 ]
- 学校で宿題が出たんですけど、私の力では解けなくて・・・
微分方程式の境界値問題
y''(x) = f(y(x)), 0<x<1, y(0)=y(1)=0
の解を数値的に求める方法のひとつとして、射的法（shooting method）
があります。自然数ｎを与えて、区間[0,1]をｎ等分して、ykをy(k/n)
の近似式として、漸化式（ここから下のyの後ろのカッコの中身は添え字と思え）
y(0) = 0, y(1)= t,
y(k+1) = 2y(k) - y(k-1) + 1/n²f(y(k)), k=1,2,…,2n-1,
の解の数値的y(n)=0 を満たすものを、上の問題の近似解として求める方法です。yn=0となる数列を求めるために、ynを未知パラメータtの関数とみなして、tに関する二分法を使います。
正の実数aを適当に定めて、
f(y) = ay(1 - y)
の場合の近似解y(k)を、誤差10-6の範囲で求めるプログラムを作成してください。
自然数nは適当に決めてください。（２のベキ乗にするのが無難です）
実数あの値は、とりあえず２０にしてみてください。
（注意：a≧10でないと…）
お前ら解ける？ｗ
- 28 名前：デフォルトの名無しさん mailto:sage [2010/02/04(木) 16:18:18 ]
- >>27
ゆみこという名前と
>お前ら解ける？ｗ
この文が矛盾し過ぎるんだが
- 29 名前：ゆみこ [2010/02/05(金) 12:22:34 ]
- やっぱり解けない馬鹿だらけだなｗ
- 30 名前：ゆみこ [2010/02/05(金) 12:23:14 ]
- 釣りだと気付かないとかあわれすぎるｗ
- 31 名前：デフォルトの名無しさん mailto:sage [2010/02/05(金) 12:30:28 ]
- 自分で解けるんなら自分で解けやカス
- 32 名前：デフォルトの名無しさん [2010/02/07(日) 18:14:06 ]
- hou
- 33 名前：デフォルトの名無しさん [2010/02/22(月) 15:20:38 ]
- 問題
楕円内の定点Aより光が出て楕円にぶつかり反射する。
反射した光はまた楕円にぶつかり反射する。
この操作を繰り返すとき、光の通った跡を直線として描くと
楕円の内部を埋め尽くすか否かシミュレーションせよ。
お願いします
出発点Aの位置を変え実験せよ。（光のはじめの方向は適当でよい）
- 34 名前：デフォルトの名無しさん mailto:sage [2010/02/22(月) 15:24:17 ]
- >>33
結果をどうやって示すの？
埋め尽くすかどうかを何を基準に判定するの？
- 35 名前：デフォルトの名無しさん [2010/02/22(月) 16:23:28 ]
- >>34
分かりにくくてすいません。
適当にいくつかの数値を代入して、図示されればいいです。
埋め尽くすかどうか、というのはやらなくていいみたいです。
- 36 名前：デフォルトの名無しさん mailto:sage [2010/02/22(月) 16:39:53 ]
- >>35
図示するツールは何にするの？
線分の頂点をテキストファイルに吐き出せば、そっちで処理できる？
- 37 名前：デフォルトの名無しさん mailto:sage [2010/02/22(月) 17:20:25 ]
- ごちゃごちゃうるさいなあ・・・
まず適当に作ってから聞いて下さいよ
- 38 名前：デフォルトの名無しさん mailto:sage [2010/02/22(月) 18:12:40 ]
- だめだこりゃ(´･ω･`) 自分で勝手にやれ
- 39 名前：デフォルトの名無しさん mailto:sage [2010/02/26(金) 20:49:17 ]
- 可変長文字列リストから任意のものを、変数を使わず取り出すにはどうすればいいですか？
たとえば
writeln(("January__February_March____April____（略）October__November_December_")[10..18]);
とすれば固定長としては取り出せますが・・・
- 40 名前：デフォルトの名無しさん mailto:sage [2010/02/26(金) 23:32:39 ]
- 本当に取り出せた？
- 41 名前：デフォルトの名無しさん [2010/05/23(日) 23:39:18 ]
- ちょっと見てみたけどパスカルわかんねーので。
なんかendが多すぎね？
ttp://anchorage.2ch.net/test/read.cgi/siberia/1235319741/680
> プログラミング初心者です。以下の課題が出されたのですが、まったくわかりません。助言おねがいします。
- 42 名前：デフォルトの名無しさん mailto:sage [2010/05/24(月) 01:39:53 ]
- >>41
なぜにシベリア、それにperlじゃないのかそれ？
- 43 名前：デフォルトの名無しさん mailto:sage [2010/05/24(月) 01:44:21 ]
- >>42
begin endがあったからパスカルかとおもた。すまんかった。
- 44 名前：デフォルトの名無しさん mailto:sage [2010/06/01(火) 01:09:14 ]
- >>42
perlじゃないよねRubyかな？
- 45 名前：デフォルトの名無しさん [2010/07/01(木) 21:57:27 ]
- 以下の条件(仕様)を満たすプログラムを作成し， そのプログラム(Pascalプログラムソースファイル)とともに その解説書を提出すること．
逆ポーランド記法で入力された論理式の充足可能性を判定し， その式の値をtrueにする変数値を，通常の表記とともに出力すること．
可能な演算は論理積(and)， 論理和(or)， 否定(not)， の3種類として， それぞれ 'a'，'o'，'n' で表現すること．
使用可能な論理変数は x0, x1, ..., x9 の10種類とし， それぞれ '0'，'1'，...，'9' で表現すること．
例) (x1∧x2)∨(¬x1∧x3) ⇒ 12a1n3ao
使用できない文字が含まれる入力に対してエラーの旨を出力すること．
入力された論理式の充足可能性を判定， 式の値を true にする変数値を出力した後， 再度入力待ち状態になり， 空の文字列を入力するとプログラムが終了すること．
これお願いします。解説も出来たらお願いします。
- 46 名前：デフォルトの名無しさん mailto:sage [2010/07/01(木) 22:15:03 ]
- すいません便乗して
[1] 授業単元：2分探索法
[2] 問題文： uploader.sakura.ne.jp/src/up10962.jpg
[3] 環境
[3.1] OS： Windows
[3.2] バージョン：pascal
[3.3] 言語： pascal
[4] 7月2日の3時まで
[5] 特になし
リンク先に問題文をおきました。
問題が２つあるので、b1.rb b2.rb というふうにしてください。
よろしくお願いします。
- 47 名前：デフォルトの名無しさん [2010/07/13(火) 14:59:33 ]
- １個の自然数ｎを適当決めて、ｎチームが参加する
リーグ戦の全試合日程を表示するプログラムを書きなさい
お願いします！
|
 |
