Дано четырехзначное число n. Выписать число в обратном порядке.
n- четырехзначное число (1762)- исходные данные
a,b,c,d - цифры этого числа( вспомогательные переменные).
m- обратное число(результат)
Решить через div и mod
Ответы на вопрос
Ответил petyaGavrikov
0
var n,m,a,b,c,d:integer;
begin
write('n = ');
readln(n);
a:=n div 1000;
b:=n div 100 mod 10;
c:=n mod 100 div 10;
d:=n mod 10;
m:=d*1000+c*100+b*10+a;
writeln('m = ',m);
end.
Пример:
n = 1762
m = 2671
begin
write('n = ');
readln(n);
a:=n div 1000;
b:=n div 100 mod 10;
c:=n mod 100 div 10;
d:=n mod 10;
m:=d*1000+c*100+b*10+a;
writeln('m = ',m);
end.
Пример:
n = 1762
m = 2671
Новые вопросы
Биология,
2 года назад
Английский язык,
2 года назад
Биология,
8 лет назад
Математика,
8 лет назад
Математика,
9 лет назад