Ответы на вопрос:
vara,b,c,n,i: integer; beginn: =0; readln(a); readln(b); readln(c);
if a> 0 thenn: =n+1; if b> 0 thenn: =n+1; if c> 0 thenn: =n+1; writeln('kolichestvo polozitelnich=', n)end.
Популярно: Информатика
-
30Космос0330.07.2022 03:22
-
liza028128.08.2021 08:01
-
ecuzera261113.12.2020 11:55
-
cvetok31maia14.04.2022 04:29
-
vladislavfomin16.11.2022 23:13
-
Диана1Котова18.07.2021 14:01
-
ленок20913.03.2022 16:58
-
Mirano200417.04.2020 05:51
-
Ivan20828004.10.2020 15:29
-
avraval200905.05.2023 10:28