Сложение двух чисел в Delphi 10 Seattle на C++ (консольное приложение)

В статье рассказывается как создать консольное приложение сложения двух чисел в Delphi 10 Seattle.

Создание нового приложения

В итоге, появится вот такое окно:

Сохраните всё:

Написание кода

Добавьте такие переменные:

var
a,b,c:integer;

А тело программы замените на это:

writeln('Input first number');
readln(a);

writeln('Input second number');
readln(b);

c := a + b;

writeln('Sum ', c);

readln(a);

Общий код будет выглядеть так:

program Project1;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils;

  var
   a,b,c:integer;

begin
    writeln('Input first number');
    readln(a);

    writeln('Input second number');
    readln(b);

    c := a + b;

    writeln('Sum ', c);

    readln(a);
end.

Сохраните всё и запустите: