プロフェッショナルがハッカー度を計ってくれるスレ (777レス)
上下前次1-新
440: Turbo Pascal版 [sage] 02/01/20 17:20 AAS
program KeGengo;
var
Daiichi, Daini: Double;
Beki: Double;
begin
Writeln('第一数字(半角数字で入力してください):');
Readln(Daiichi);
Writeln('第二数字(半角数字で入力してください):');
Readln(Daini);
Beki := Power(Daiichi, Daini);
Writeln;
Writeln(Format('足し算:%f + %f = %f', [Daiichi, Daini, Daiichi + Daini]));
Writeln(Format('足し算:%f - %f = %f', [Daiichi, Daini, Daiichi - Daini]));
Writeln(Format('足し算:%f * %f = %f', [Daiichi, Daini, Daiichi * Daini]));
Writeln(Format('べき乗:%f の %f = %f', [Daiichi, Daini, Beki]));
end.
上下前次1-新書関写板覧索設栞歴
あと 337 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.014s