Программа на pascal. вывести на экран все числа кратные заданному а, из интервала указанного или так наверно понятнее: пользователь ввел число а и интервал чисел, из этих чисел вывести на экран кратные числу а.

ера2009 ера2009    3   28.02.2019 11:50    4

Ответы
sholdakirnichnp0175q sholdakirnichnp0175q  23.05.2020 16:56

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

B и C,где B<C

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика