Напишите программу на яп паскаль для решения - вопрос №591593 от nomar 14.06.2021 19:15

Question

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

nomar · Answer

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....