напишите программу для записи четырехзначного числа в обратном порядке.
Например:
2451-->1542
Паскаль.
Ответы
Ответ дал:
0
var n,m: integer;
begin
write('n = '); readln(n);
m:=0;
repeat
m:=m*10+(n mod 10);
n:=n div 10;
until n=0;
writeln(m);
end.
n = 2456
6542
begin
write('n = '); readln(n);
m:=0;
repeat
m:=m*10+(n mod 10);
n:=n div 10;
until n=0;
writeln(m);
end.
n = 2456
6542
Ответ дал:
0
ты просто переписал из другого сайта
Ответ дал:
0
Во первых, это не прилично, "тыкать", во вторых, я Вам могу привести еще три варианта решения этой задачи, если Вы в этом разбираетесь. Например, такое writeln(ReadString.Reverse.JoinIntoString(''));
Ответ дал:
0
Или, может быть, Вы хотите "изобрести" велосипед?
Ответ дал:
0
нет , мне нужен другой вариант
Ответ дал:
0
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
ReadInteger().ToString().Reverse().Select(x->x.ToDigit()).Println('');
end.
//Версия 3.3, сборка 1611
begin
ReadInteger().ToString().Reverse().Select(x->x.ToDigit()).Println('');
end.
Ответ дал:
0
Слишком сложно 0_0
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад