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

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

📖 Содержание ⬇️

Содержание

• Создание нового приложения
• Написание кода

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

Рисунок 1 — Создание нового проекта

Рисунок 2 — Выбор консольного типа проекта

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

Рисунок 3 — Созданный проект

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

Рисунок 4 — Сохранение проекта

Рисунок 5 — Сохранение файла проекта

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

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

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.

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

Рисунок 6 — Запуск приложения

Рисунок 7 — Результат выполненной программы