Напишите в паскале программу, которая высчитает сумму четырех чисел, используя только две переменные.

Question

Информатика

Татуся

10 июня, 19:08

Напишите в паскале программу, которая высчитает сумму четырех чисел, используя только две переменные.

+1

Ответы (1)

Знаешь ответ?

Флорентина · Answer 1

Program z1;

var

a, b: integer;

begin

a:=0;

readln (b);

a:=a+b;

readln (b);

a:=a+b;

readln (b);

a:=a+b;

readln (b);

a:=a+b;

write (a);

end.

или

program z1;

var

a, b: integer;

procedure add;

begin

readln (b);

a:=a+b;

end;

begin

a:=0;

add ();

add ();

add ();

add ();

writeln (a);

end.