Вывести на экран все двузначные числа перевертыши. Через паскаль

Вывести на экран все двузначные числа перевертыши. Через паскаль

Задать свой вопрос
1 ответ

//PascalABC.NET

begin

 for var i := 10 to 99 do

   for var j := 10 to 99 do

     if (i div 10 = j mod 10) and (i mod 10 = j div 10) then

       writeln(i, ' ', j);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт