読み込んだ整数の１０倍の値を表示

明解Ｃ言語 入門編 > 1. まずは慣れよう >

読み込んだ整数の１０倍の値を表示

Delphi

program Project1;
{$APPTYPE CONSOLE}
uses

    SysUtils;

var

    no: Integer;

begin

    write('整数を入力してください：');

    read(no);
    write(format('その数の１０倍は%dです。'#13#10, [no * 10]));

end.

実行結果

S:\>lesson004\project1.exe

整数を入力してください：37

その数の１０倍は370です。