Вопрос от посетителя:
Программа на Pascal.
вывести на экран все числа кратные заданному А, из интервала указанного пользователем…
или так наверно понятнее:
пользователь ввел число А и интервал чисел, из этих чисел вывести на экран кратные числу А.
Илюха отвечает:
пусть введенный интервал будет
B и C,где B var a,b,c,i:longint; begin read(b,c); for i:=b to c do if i mod a=0 then write(i); end.