Найти в Дзене
2 подписчика

Даны два числа. Найти их сумму и вывести её.


Var x,y,z:integer; - описываем переменные (x,y)- первое и второе слагаемое.
begin
 writeln ('введите слагаемые'); - выводим пояснение
 read (x,y); - вводим значение переменных (слагаемых)
 z:=x+y; - выполняем подсчёт.
 writeln (z); - выводим сумму.
end. - заканчиваем программу.
Около минуты