Скребти применяется бесконечный цикл всегда и в него вложено 5 команд в ветвление ЕСЛИ ... То
211
374
Ответы на вопрос:
1)var numb,pro: integer; begin pro: =1; for numb : = 100 to 999 do if (numb mod 10 = 5) then pro: = pro*numb; writeln(pro); end.2)var numb,summ: integer; begin for numb : = 10 to 99 do if (numb mod 10 = 5) then summ: = summ+numb; writeln(summ); end.
Популярно: Информатика
-
antarxanoff200126.09.2021 13:34
-
Iamboss1111115.01.2022 01:40
-
povarnicyna10629.01.2020 11:27
-
Иришка2007Шеховцова04.01.2021 13:07
-
nasibyannn08.05.2023 01:28
-
toriblinova07.11.2022 05:42
-
GordienkoA2019.03.2022 09:38
-
Yasenevo103627.11.2020 06:26
-
Krisrus201019.08.2022 23:52
-
ruslananabok08.06.2021 21:16