Pascalの宿題は俺にやらせろ！！Part2

Pascalの宿題は俺にやらせろ！！Part2 at TECH

791:デフォルトの名無しさん
08/10/28 17:54:59
>>784
これ、ニュートン法と呼ばれる平方根を求めるアルゴリズムですね
問題が非常に不鮮明で最初の一文が無いと到底理解できない設問です。
ハッキリ言って悪題ですね。
きわめてシンプルにするとこんな感じになります。
function fSqrt(x:Double):Double;
var
s,last:Double;
begin
Result:=0;
if x<=0 then exit;
if x>1 then s:=x else s:=1;
repeat
last := s;
s := (x/s+s) * 0.5;
until s<last;
Result:=last;
end;
原理は簡単なので「平方根、ニュートン法」で調べてください。
ターミナルはwindowsのネットワーク越しにコンパイルを行う通信クライアントだと思われます。
もしかしたら、コンパイラはPascalじゃなくCかもしれません。
使用言語やコンパイル自体が分からない場合は友達と相談してください。
でわでわ。

次ページ

続きを表示

1を表示