Примеры (по 3) достоверной, актуальной, объективной, понятной, полезной, полной информации.
264
380
Ответы на вопрос:
Var k,sum: integer; begink : =100; while(k < 201) dobeginif (k mod 17) = 0 then beginwriteln(k); sum: = sum +k; end; k: = k + 1; end; writeln('sum =', sum); end.{102119136153170187sum =867}
Популярно: Информатика
-
Daliloshka21.01.2021 12:09
-
лисичка2345603.09.2022 09:40
-
para65626.05.2020 04:58
-
Smolensk14522.11.2020 07:27
-
лалала7418.09.2021 19:56
-
Apple806605.02.2020 03:37
-
lezifequliyeva08.08.2020 10:53
-
рашитгаиф05.05.2020 23:36
-
retul04.04.2021 09:29
-
HELP111111111111q06.05.2022 22:15