Предмет: Информатика, автор: xXLeOXx

Напишите программу через for, пожалуйста.

Найти в дипазоне [40;70] сумму чисел, которые делятся на 5 с остатком 1

Ответы

Автор ответа: rkarlu2002ROMZES
1
program qq;var a,b,sum:integer;BEGINsum:=0;for a:=40 to 70 do beginif a mod 5=1 then sum:=sum+a;end;writeln(sum);END.
Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: Английский язык, автор: sarakaronina
Срочно!!!!!!!! Помогите с решением ​
5 лет назад
Предмет: Другие предметы, автор: VIncentReg
Як ковалеві вдалося приборкати чорта?
"Ніч перед Різдвом"​
5 лет назад
Предмет: Английский язык, автор: liahbandura
ПЕРЕВЕДИТЕ ТЕКСТ. НЕ С ПЕРЕВОДЧИКА. СРОЧНО. ПОЖАЛУЙСТА
Наводнение- очень страшное явление. Это один из видов стихийных бедствий. Я никогда не наблюдала наводнение, но знаю, что оно происходит из-за того что поднимается уровень воды в реках, озёрах и морях. Это явление может вызвать много смертей. Наводнение затапливает дома, разрушая их.

В нескольких словах хочу рассказать историю, которую прочла в статье про наводнение. Один из людей решил попробовать заказать ограждение, которое могло бы предотвратить затопление его дома. Он заказал огромный шланг, потратив на это много денег. Его надо было разложить вокруг дома и заполнить водой. Этот человек не верил э, что из этого что-то выйдет также как не верили и его соседи. На это было потрачено много денег, но более того это помогло уберечь дом.

Подсумировав владелец дома сказал, что он очень сэкономил на ремонте
5 лет назад
Предмет: Математика, автор: tatyankashabal
Рыбаки выловили 312 1/2 кг рыбы.0,71 из них сазан,0,13-щука,остальные -судак.сколько килограммов судака выловили рыбаки?
9 лет назад
Предмет: Математика, автор: lolitapetrosy
Бабушка испекла 8 булок и разложила их на 4 тарелки. Сколько булок на каждой тарелке?
9 лет назад