Ответы на вопрос:
Var a: integer; begin for a: =50 dawnto 1 do begin if (a mod 2< > 0) then writeln(a); end; end.
Популярно: Информатика
-
Решите и пришлите до понедельника я вам буду какой из четырех...
55576716.08.2020 14:04 -
В некоторой папке хранится файл Компот.doc. После того, как...
Король34403.08.2021 10:32 -
На бесконечное поле, расчерченное в клетку, капнули субстанцией...
iceheart161819.04.2021 16:06 -
Что лучше всего сжимается архиватором? гифка (gif) картинка...
оркп16.07.2021 00:39 -
Почему некоторые файлы не становятся меньше после применения...
aliya77usa09.09.2022 20:25 -
Какие алгоритмы (из изученных на курсе) лежат в основе программ-архиваторов?...
nikaerika1121.01.2020 04:46 -
Виконай послідовність команд і пройдисвіт маршрут.який приз...
Dog1234714.11.2020 18:03 -
Утворити і вивести масив у з елементами уk = fi(k), де і - номер...
kristinakarpova204.02.2023 05:38 -
Виконай послидовнисть команд ы пройди маршрут. який приз ти...
Сашок31104.01.2020 17:56 -
Найти разность 41(10) - 17(10) в восьмибитном представлении...
Monstrozacrs11.10.2022 03:39