Решить в Паскале с помощью операторов while и repeat

1) Вывести на экран все четные числа из диапазона от A до В, кратные трём (А<=В)

2) Вывести на экран все двузначные числа в которых старшая цифра отличается от младшей не больше, чем на 1

Question

Информатика

Витяша

11 февраля, 11:30

Решить в Паскале с помощью операторов while и repeat

1) Вывести на экран все четные числа из диапазона от A до В, кратные трём (А<=В)

2) Вывести на экран все двузначные числа в которых старшая цифра отличается от младшей не больше, чем на 1

+4

Ответы (1)

Знаешь ответ?

Мариам · Answer 1

1. read (a);

read (b);

while (a<=b)

begin;

if ((a mod 2 = 0) and (a mod 3 = 0)) or ((b mod 2=0) and (b mod 3 = 0)) then

begin;

write (a)

else

if (b mod 2=0) and (b mod 4=0) then

write (b)

else

end;

readkey;

end.

второе прости могу только на си