Решаем задачи Абрамян на Паскале. String21

String21. Дано целое положительное число. Вывести символы, изображающие цифры этого числа (в порядке справа налево).

Решение:

program String21;
var
  N,i:integer;
  S:string;

begin
 Write('N:');
 Readln (N);

 Str(N,S);
 for i:=Length(S) downto 1 do Write(s[i]);
end.

program String21;

var

N,i:integer;

S:string;

begin

Write('N:');

Readln (N);

Str(N,S);

for i:=Length(S) downto 1 do Write(s[i]);

end.

Другие задачи из раздела String можно посмотреть здесь.