Есть ответ 👍

Напишите, , программу . дано: х, у, z найти: вывести на экран только положительные числа и найти сумму отрицательных

151
168
Посмотреть ответы 2

Ответы на вопрос:


Var sum, a,b,c: real; begin readln(a,b,c); if a > 0 then write(a, ' ') else sum: = sum + a; if b > 0 then write(b, ' ') else sum: = sum + b; if c > 0 then write(c, ' ') else sum: = sum + c; writeln; writeln('cумма отрицательных эл-в = ', sum); end. пример: -5 2 1 2 1  cумма отрицательных эл-в = -5

1) сайты. 2) книгой. 3) страниц.   4) страницами сайта. 5) ссылки. 6) информацию. 7) гиперссылками.

Популярно: Информатика