Решить в Паскале с помощью операторов while и repeat
1) Вывести на экран все четные числа из диапазона от A до В, кратные трём (А<=В)
2) Вывести на экран все двузначные числа в которых старшая цифра отличается от младшей не больше, чем на 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.второе прости могу только на си