Вывести на экран в виде таблицы все целые числа от a до b ,кратные c
Вывести на экран в виде таблицы все целые числа от a до b ,кратные c
Гость
Ответ(ы) на вопрос:
Гостьvar a,b,c:integer;
begin
read(a,b,c);
for a:=a to b do
if a mod c = 0 then write(a,' ');
end.
Не нашли ответ?
Похожие вопросы