Ответы на вопрос:
Var a,b,c: integer; begin for a: =1 to 100 do begin if a mod 2=0 then b: =b+aelsec: =c+a; end; writeln(b); write(c); end.
Популярно: Информатика
-
ПРАВИЛЬНЫЙ ОТВЕТ 3. НУЖНО РЕШЕНИЕ Пользователь работал с каталогом...
АняГ1118.07.2020 21:32 -
Створити проект, в якому рибка ганяється за черв яком, керованим...
111леся19924.06.2023 06:24 -
Феофилакт хочет купить ракетки и шарики для игры в настольный теннис....
Ботаник111111111120.11.2021 01:43 -
НУЖНЫ ФОРМУЛЫ ДЛЯ АНАЛИЗА БОЛЬШИХ МАССИВОВ ДАННЫХ В EXCEL 1. Сколько...
юра41701.06.2022 03:59 -
Инфарматика 7сынып 4тоқсан бжб жауаптары...
chitaevtimur13418.08.2020 04:50 -
2. Отметьте все правильные объявления массива в языке Паскаль. var...
igornagornov020.05.2022 10:13 -
Какая вкладка меню дает возможность настроить эффектную появление...
сабрина2329.04.2023 11:06 -
скорость передачи данных через ADSL соединение равна 128000 бит/с...
vlada2391220.09.2022 12:44 -
Таблица истинности (Ā ^ C) ^(только другой стороной)A (A ^ Y(сверху...
санду725.01.2021 22:06 -
Вычисли значение арифметического выражения...
mirnayamilena07.05.2020 19:40