Написать программу, в которой используется процедура por(k), меняющую порядок следования цифр целого положительного числа k на обратный (k — параметр целого типа, являющийся одновременно входным и выходным).
sample input 1:
643254
sample output 1:
452346
sample input 2:
479554
sample output 2:
455974
решите на паскале
nikolesyas
1
04.01.2020 21:06
4
Другие вопросы по теме Информатика
Luna2904
13.07.2019 10:50
shapuk
05.09.2019 01:20
tanyaNat82
05.09.2019 01:20
kros222999
01.10.2021 23:46
daryanashpakov
28.09.2019 03:40
natilis
28.09.2019 03:40
Scvetocheek1
12.05.2020 07:44
npapriko
12.05.2020 07:43
Популярные вопросы
- Используя материал § 17, напишите, в чём проявилось отставание...
2 - По какому признаку образованы ряды? Архангельск, Свенский монастырь,...
3 - Заполните схему, используя знания из курса истории, а также §...
2 - Используя пункт 7 § 18, заполните пропуски в схеме Соборное уложение...
3 - Прочитайте пункт 3 § 19. Придумайте к его содержанию два-три вопроса....
1 - Установите стрелками соответствие между приказами и вопросами,...
2 - Проследите, как шёл процесс закрепощения крестьян в Российском...
1 - Выберите из пункта 1 § 19 одно-два предложения, отражающих главные...
3 - Прочитайте отрывок из работы современного историка Т.В. Черниковой...
3 - Прочитайте пункт 5 § 19. Заполните пропуски в тексте. составляли...
3
PascalABC.NET
procedure Por(var k:integer);
begin
var m := 0;
while k > 0 do
begin
m := m * 10 + k mod 10;
k := k div 10
end;
k := m;
end;
begin
var n := ReadInteger('Введи натуральное число:');
Por(n);
Print(n)
end.