Как использовать раздел «Эффекты» в программе Paint Net?
подпишусь кто ответит
189
230
Ответы на вопрос:
uses crt; var a,x1,x2: integer; beginx1: =1; x2: =0; readln(a); while a< 300 do begin if (a mod 2< > 0) then x1: =x1*a; if (a< 0) then x2: =x2+1; readln(a); end; writeln('произведение нечётных чисел=', x1); writeln('кол-во отрицательных чисел=' , x2); readln; end.
Популярно: Информатика
-
Кристина670100128.03.2021 13:57
-
УмНяша0120.12.2021 10:29
-
Zaminaej17.03.2023 01:20
-
DEKTG03.03.2020 03:48
-
darya4ern120.06.2023 20:15
-
Даниэлла2511129.01.2020 06:27
-
minyoourae11.08.2020 00:54
-
помоги26906.11.2020 16:26
-
danya16631.07.2022 18:59
-
lera505301.01.2023 10:03