< >

в интервале от 10 до 20 найти все числа,которые делятся на 3 без остатка.Паскаль.

Ответы

Ответ дал: HakkerSS
0
program abc;
var x,i:integer;
begin;
for x:=10 to 20 do
if x mod 3 = 0 then writeln (x);
end.
Похожие вопросы
Русский язык
2 года назад
тест . 1) Найдите ошибку в управлении: а.касаться проблем воспитания б.прикоснуться к горячему утюгу в.различать плохое и хорошее г.отличать звуки и буквы 2)Найдите предложения с
Русский язык
2 года назад
Здравствуйте! помогите пожалуйста сделать звуко-буквенный разбор слов: перина, ядро,юрта, лопата, редкий.
Биология
7 лет назад
Что из перечисленного относится к факторам живой природы? А) Температура окружающей среды. Б) Осушения водоемов. В) Ветер. Г) Хищничество.
Математика
7 лет назад
поможіть будь ласка. Срочно На фото
Биология
10 лет назад
Поясните, почему популяционно-видовой и биогеоценотический уровни часто называют надорганизменными. Докажите, что лес является биосистемой.
Химия
10 лет назад
при сжигании 6 г органического вещества образовалось 13.2 г оксида(4) и 7.2 г воды. определите молекулярную формулу вещества, если относительная плотность его паров по воздуху равна 2,069 WebRepОбщий
Геометрия
10 лет назад
Помогите пож....В треугольнике АВС АС=ВС ,угол С равен 120 градусов,АС=25корень из 3 . Найдите пож АВ
Химия
10 лет назад
Сколько граммов мяса должен содержать суточный рацион человека, если суточная норма потребления белка составляет 100 г, а содержание белка в мясе равно 18% ?