Напишите программу на яп паскаль для решения следующей - вопрос №591593 от sweet690 23.12.2021 16:06

Question

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

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