Предмет: Информатика, автор: laraekyushhu

Напишите программу на ЯП Паскаль для решения следующей задачи:
Вывод на экран строки символов в обратном порядке (например, была введена строка ‘наоборот’, результат после выполнения программы на экране – ‘торобоан’).

Ответы

Автор ответа: iolandavalerypad353
0

function foo(s: string; n: integer): string;

begin

 if n = 1 then foo := s[1]

 else foo := s[n] + foo(s, n - 1)

end;

begin

 var s := 'наоборот';

 Print(foo(s, s.Length))

end.

Похожие вопросы
Предмет: Русский язык, автор: Аноним
Предмет: Математика, автор: menera72muza
Предмет: Математика, автор: toxin456