Составить программу используя оператор GOTO вводятся числа после ввода каждое число...

Question

Составить программу используя оператор GOTO вводятся числа после ввода каждое число программы должно печатать их сумму ПОМОГИТЕ ПОЖАЛУЙСТА ДАЮ 35 БАЛЛОВ

Answer 1

Program P11;

label 1;

var a, b, c : integer;

begin

1:

writeln('Введите 2 числа');

read(a, b) ;

c:= a+b;

writeln('Сумма =', c);

goto 1;

end.