Найти сумму трех положительных вводимых с клавиатуры чисел. (Программа паскаль)Пример входных данных \ Пример выходных данных2 8 -3 \ 10-2 8 -3 \ 82 8 3 \ 13
Ответ:
150/160/170
Объяснение:
нужно программу в паскале составить
Var a, b, c: real;
begin
Write(‘введите числа>>’);
readln(a,b,c);
If a<0 then </p>
If b<0 then </p>
If c<0 then </p>
Write(‘0’)
else
Write(c)
Else
Write (b)
Write(c+b)
Else if b<0 then </p>
write (a)
Write(a+c)
Write(a+b)
write(a+b+c);
End.