Написать программу в паскале:
Дано трехзначное число. Найти число, полученное перестановкой первой и третьей цифры заданного числа.

2
Комментарий удален
в pascal abc всё норм
Комментарий удален
Комментарий удален
Комментарий удален

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

2014-02-03T13:31:33+00:00
Var a,b,c,n:integer;beginreadln(n);{находим 1 цифру}a:=n mod 10;b:=n div 10 mod 10 ;c:= n div 100;n:=100*a + 10*b + c;writeln(n);end.
не переставляет
Комментарий удален
2014-02-03T15:43:17+00:00
Другой способ:
var a,i:longint;
begin
readln(a);
for i:=1 to 3 do
begin
write(a mod 10);
a:=a div 10;
end;
end.