Определить и вывести на экран количество трехзназных чисел ,которые делятся 3 , 5 и 7 одновременно
SuperPuper131
3
14.07.2019 23:40
0
Другие вопросы по теме Информатика
akyngazy96
30.04.2020 07:49
motorindmitry12
11.03.2019 16:32
kos2008
29.07.2019 15:20
mpotlov747
29.07.2019 15:20
дарья1627
04.04.2019 09:38
kazan20001202
04.04.2019 09:55
Знання6666
04.04.2019 09:56
Популярные вопросы
- 5) he asked me how long i (had/have) studied at that school...
1 - Постпвьте в страдательный залог .onee a week tom cleans the house...
1 - Найдите 3 угол треугольника если у него 2 угла равны 65 и 80 градусам...
2 - Определить степень окисления элементов: mncl2, mno2, mno, mn2o7, mn...
2 - Найдите: 1/4 числа 0,728 3/8 числа 0,024 21% числа 4200...
3 - Когда из коробки вщяли 9 ,то в ней осталось 6 конфет.сколько конфет было...
2 - Реши . расстояние между двумя замками 168 км. посыльный 4 часа мчался на...
1 - Выполните действия и)-3/14*7/9-8/15: ( 4/5) +1/12...
2 - Напиши статью о зож (здоровый образ жизни) или о том,каким спортом ты занимаешься.дарю...
1 - Выбирете 3верных ответа внутрения среда организма образованная кровью, лимфой,...
3
var i,k :integer;
begin
k:=0;
for i:=100 to 999 do
if (i mod 3=0) and (i mod 5=0) and (i mod 7=0) then
k:=k+1;
writeln(k);
end.