В статье рассказывается как создать консольное приложение сложения двух чисел в Delphi 10 Seatle.
Статья из цикла «Сложение двух чисел». Для меня минимальное освоение любой системы программирования начинается с возможности создания такой программы. Если можно написать приложение, в которой пользователь может ввести два числа, считать их, провести с ними какие-то действия, а потом вывести результат, то, значит, базовое владение имеется. И много задач именно из области программирования, алгоритмики можно будет решать, зная, как в конкретной системе программирования запрограммировать такую программу.
Содержание
Создание нового приложения
В итоге, появится вот такое окно:
Сохраните всё.
Написание кода
Добавьте такие переменные:
1 2 |
var a,b,c:integer; |
А тело программы замените на это:
1 2 3 4 5 6 7 8 9 10 11 |
writeln('Input first number'); readln(a); writeln('Input second number'); readln(b); c := a + b; writeln('Sum ', c); readln(a); |
Общий код будет выглядеть так:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
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. |
Сохраните всё и запустите.