Напишите, , программу . дано: х, у, z найти: вывести на экран только положительные числа и найти сумму отрицательных
151
168
Ответы на вопрос:
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) гиперссылками.
Популярно: Информатика
-
koliskynakate2024.03.2022 16:37
-
karrr12324.01.2022 14:47
-
DaNike150221.05.2023 00:40
-
DashaPol0919.05.2021 19:35
-
ezof204.07.2021 14:01
-
fastas3219.11.2021 13:49
-
Black1349514.10.2020 13:09
-
anyasaveleva208.06.2021 19:31
-
adamchik11.09.2022 22:51
-
Glebforst03.09.2022 16:33