読み込んだ２つの整数値は等しいか (等価演算子)

明解Ｃ言語 入門編 > 3. プログラムの流れと分岐 >

読み込んだ２つの整数値は等しいか (等価演算子)

Delphi

program Project1;
{$APPTYPE CONSOLE}
uses

    SysUtils;

var

    x1, x2: Integer;

begin

    writeln('２つの整数を入力してください。');
    write('整数１：');

    read(x1);
    write('整数２：');

    read(x2);
    if (x1 = x2) then

        writeln('それらの値は同じです。')

    else

        writeln('それらの値は違います。');

end.

実行結果

S:\>lesson017\project1.exe

２つの整数を入力してください。

整数１：-5

整数２：-5

それらの値は同じです。
S:\>lesson017\project1.exe

２つの整数を入力してください。

整数１：40

整数２：45

それらの値は違います。