Даны натуральные числа от 1 до 50. найти сумму тех из них, которые делятся на 5 или на 7.паскаль !
Olivka09
2
30.06.2019 02:20
6
Другие вопросы по теме Информатика
BlaBla552
12.04.2021 05:56
ИрэнУолтен
12.04.2021 05:53
zvonilovakarina
12.04.2021 05:22
Утешитель
12.04.2021 05:18
Velichkovskaya
06.10.2019 14:40
moni9
06.10.2019 14:40
alianna366
06.10.2019 14:40
sofka123890
02.03.2019 12:00
ВиГуки247
14.02.2021 14:51
Популярные вопросы
- Сумма коэффициэнтов в кратком ионном уравнении сульфат натрия+оксид...
3 - На выполнение ученик 4 клас потратил 1 час 30 мин. 1/4 час он...
2 - Как 4 1/2 ,1 2/3, 2 3/4, 5 1/6, 7 3/8 и 10 5/12 пр вести к наименьшему...
2 - Кроссворд по за 7 класс по египту заранее огромное p.s.: на 15...
2 - Объясните как вычислить log(2) (корень из 5 - 1) + log(2) (корень...
1 - Покажите письменно как образованны наречия в слове светло глубоко...
3 - Найдите производную функции f(x) а) f(x)=3x-4x^2 б) f(x)=x^7-3x^6+3x^3-23...
2 - Can you name a television character who is 1. funny 2. friendly...
1 - Укажите фразеологизм который является старославянским по происхождению...
3 - Разбейте высказывания на истинные и ложные исправьте ложные высказывания...
3
var i,k: integer;
begin
k:=0;
For i:=1 to 50 do
If (i mod 5=0) or (i mod 7=0) then k:=k+i;
Writeln('Сумма этих чисел: ',k);
end.