Question

15 задание. Помогите пожалуйста!!! ДАЮ 33 балла

Answer 1

Ответ:

var

 a, b, c, sum : integer;

begin

 readln(a, b, c);

 if(a > 0) then sum := sum + a;

 if(b > 0) then sum := sum + b;

 if(c > 0) then sum := sum + c;

 writeln(sum);

end.

Объяснение: