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

Как это записать в программе паскаль?

Question

Артемич

20 мая, 11:54

+1

Ответы (1)

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

Александрыч · Answer 1

var a, b, c, s: integer;

begin

readln (a, b, c);

s:=0;

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

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

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

writeln (s);

end.

Напишите программу которая считает сумму положительных из трех веденный чиселКак это записать в программе паскаль?