1. Дано трехзначное число. Написать программу (Pascal), которая «переставляет» первую цифру числа на самое последнее место.

1

Ответы и объяснения

  • Sky09
  • профессор
2013-12-29T15:21:31+00:00
Uses crt;
var a: integer;
begin
     readln(a);
     a:=(a div 10 mod 10)*100+(a mod 10)*10+(a div 100);
     writeln(a);
end.