Nolemmiv
4 год назад
Составить программу перестановки первой и последней цифр введенного четырех значного числа
ОТВЕТЫ
Farmer Aron
Oct 24, 2020
var a,a1:integer;
begin
readln(a);
a1:=a mod 10;
a:=a1*1000+(a mod 1000-a1)+(a div 1000);
writeln(a);
end.
Пример:
8391
1398
begin
readln(a);
a1:=a mod 10;
a:=a1*1000+(a mod 1000-a1)+(a div 1000);
writeln(a);
end.
Пример:
8391
1398
60
Смежные вопросы: