Program n1; var n, a, m: longint; begin write('введите число: '); readln(n); m := 0; while n>0 do begin a := n mod 10; n := n div 10; m := m*10 a; end; writeln('перевернутое число: ',m); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
