Question

Написать программу, при которой с клавиатуры вводится 2 числа и если первое из них положительное, то находится сумма этих чисел, если отрицательное - разность.
Программу записать в двух формах: на языке блок-схем и на языке Паскаль.​

Answer 1

Ответ:

Объяснение:

program a1;

var a, b, s:integer;

begin

readln(a, b);

if a>0

 then s:=a+b

 else s:=a-b;

writeln(s);

end.