Даны натуральные числа от 20 до 50. напечатать те из них, которые делятся на 3, но не делятся на 5. программа на pascal
aika194
3
22.06.2019 00:40
17
Другие вопросы по теме Информатика
vitaly1552
16.06.2019 08:10
katau852Katau164
08.02.2021 18:37
Millernata
08.02.2021 18:36
Turtygin
08.02.2021 18:35
Arsen290
26.11.2020 13:29
ЕгорРябцев
26.11.2020 13:29
yanashowsouany
26.11.2020 13:29
vladbb2017
24.04.2020 10:52
Простоелена26
24.04.2020 10:52
fedun20042004
24.04.2020 10:53
Популярные вопросы
- 2-тапсырма. Берілген сөздерді топтаңыз. Барлық, неше, өзім, біз, сен, мен, бәрі,...
3 - Переведи заданные единицы измерения, ответ запиши в стандартном виде: 1. 3,48⋅10^6 л = ⋅10^...
1 - Поставьте, где нужно тире. Грачи это наши первые весенние гости. Лёгким запахом...
1 - Учебник §11 (стр. 54). Установите программу Inkscape по возможности Выполни команды...
3 - Как нарисовать Передвижение Воды и передвижение органических веществ в растении...
1 - 510. Амаларды орынландар(7/15-1/6)+2/5...
2 - Решите уравнение: -5,7у + 4,9у - 0,45у =2,6...
2 - Прочитай текст. Какая пословица соответствует теме текста?...
2 - Автомобиль израсходовал 6,9кг бензина за 110 км пути .Мощность двигателя равна 13...
3 - 3 Complete the sentences to make suggestions for your family about sustainability....
3
var i:integer;
begin
For i:=20 to 50 do
If (i mod 3=0) and (i mod 5 <> 0) then writeln(i);
end.