Question

Найти сумму двух чисел А и Б написать код программы на языке паскаль

Answer 1

Var a,b:real;

 

begin

 

read(a,b);

 

Write(a+b);

 

end.

Answer 2

program Symma;

 var a,b;

begin

 writeln('введите a'); readln (a);

  writeln('введите b'); readln (b);

 Writeln(a+b);

 Readln; {задержка, чтобы не убегала с экрана}

end.

 

Можно взять еще одну переменную "с".

 

program Symma1;

 var a,b,c;

begin

 writeln('введите a'); readln (a);

  writeln('введите b'); readln (b);

    c:=a+b;

 Writeln(c);

 Readln; {задержка, чтобы не убегала с экрана}

end.

 

 

удачи!