Составьте программу на Паскале, которая вводит 2 целых числа M и N и печатает все целые числа между M и N, делящиеся на 7, включая и сами эти числа. Замечание: программа должна учитывать, что заранее не известно, какое из чисел M или N больше другого.
Составьте программу на Паскале, которая вводит 2 целых числа M и N и печатает все целые числа между M и N, делящиеся на 7, включая и сами эти числа. Замечание: программа должна учитывать, что заранее не известно, какое из чисел M или N больше другого.
Похожие вопросы
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
var
M, N, i: integer;
begin
write('Enter two integers M and N: ');
readln(M, N);
if M < N then
begin
for i := M to N do
begin
if i mod 7 = 0 then
writeln(i);
end;
end
else
begin
for i := N to M do
begin
if i mod 7 = 0 then
writeln(i);
end;
end;
end.