Pascal.Написать свой возраст с клавиатуры, написать возраст любого человека и сложить их.

Question

Pascal.Написать свой возраст с клавиатуры, написать возраст любого человека и сложить их.

Answer 1

Program Age;
var myage, age, sum : integer;
begin
writeln ('Input your age:');
readln(myage);
writeln ('Input any age:');
readln(age);
sum:=myage + age;
writeln('Summa: ', sum);
end.

Answer 2

// PascalABC.NET

// Версия 3.3.5 сборка 1662 (29.04.2018)

begin

   Println('Сумма:', ReadInteger('Мой возраст -') + ReadInteger('Возраст человека -'));

end.

Пример:

Мой возраст - 15

Возраст человека - 21

Сумма: 36