Ответы на вопрос:
Var i,s: integer; begin s: =0; for i: =10 to 99 do if i mod 7 = 0 then s: =s+i; writeln('s = ',s); end. результат: s = 728
Популярно: Информатика
-
Каков минимальный объем памяти (в байтах), достаточный для хранения черно-белого...
starprichal10.01.2021 01:04 -
Что означает фраза операционная система windows обеспечивает одинаковый пользовательский...
arsjaja18.03.2020 01:47 -
определите информационный объем сообщения и мощность алфавита если известны...
zkulikiv08.06.2022 20:52 -
. Информационное сообщение объемом 512 битов состоит из 30синволов какая мощность...
ekaterina220627.05.2023 01:44 -
1,4617E-3 записать в нормализованной экспоненциальной записью данного числа:...
MilkaV17.07.2022 05:15 -
Напишите функцию которая находит максимальный элемент переданного ей динамического...
Yoidzokumi30.07.2021 23:40 -
Кто разработчик bitdefender подскажите...
alexweber201629.05.2023 05:39 -
Перевести в двоичную систему 278(10)...
vakhram10.06.2022 14:47 -
Глагол _ означает усвоить, заимствовать основные категории индивидуального...
Edinorog1Panda13.06.2020 23:40 -
Автором «Декларации прав женщины» (аналогом «Декларации прав человека») была...
РоманРазумный18.07.2020 06:42