В пятизначном числе поменяйте местами цифры единиц и сотен, тысяч и десятков. ​

leger13245 leger13245    3   22.02.2021 16:25    4

Ответы
taisechka taisechka  24.03.2021 16:29

var N,dt,t,s,d,e:integer;

begin

 writeln('Введите число');

 readln(N);

 dt:= N div 10000;

 t:= N div 1000 mod 10;

 s:= N div 100 mod 10;

 d:= N div 10 mod 10 ;

 e:= N mod 10;

 N:= dt*10000+d*1000+e*100+t*10+s;

 print(N);

end.


В пятизначном числе поменяйте местами цифры единиц и сотен, тысяч и десятков. ​
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика