Вывести числа, принадлежащие отрезку [A,B], кратные числу 3. В програме pascalABC, желательно с блок-схемой
Вывести числа, принадлежащие отрезку [A,B], кратные числу 3.
В програме pascalABC, желательно с блок-схемой
Гость
Ответ(ы) на вопрос:
Гостьvar
a, b, i: integer;
begin
read(a);
read(b);
for i := a to b do
if i mod 3 = 0 then
writeln(i);
end.
Не нашли ответ?
Похожие вопросы