プロフェッショナルがハッカー度を計ってくれるスレ (777レス)
1-

430: Delphi/Kylix版修正 [sage] 02/01/19 18:39 AAS
program ke;
{
  k - K language Compiler
}

{$APPTYPE CONSOLE}
uses SysUtils, Math;
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-
あと 347 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.016s