Программа на Pascal.

вывести на экран все числа кратные заданному А, из интервала указанного пользователем ...

или так наверно понятнее:

пользователь ввел число А и интервал чисел, из этих чисел вывести на экран кратные числу А.

Question

Феосовия

8 января, 07:52

+5

Ответы (1)

Знаете ответ на вопрос?

Нида · Answer 1

пусть введенный интервал будет

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.