1. Информатика
  2. Напишите программу на яп

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

Yxcvbnm3 Yxcvbnm3    3   07.04.2019 17:27    0

Ответы
Leron462 Leron462  07.06.2020 05:23

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
YNWA12 YNWA12  25.09.2019 06:50
Дан фрагмент программы, чему будет равна переменная s? паскаль: begin i: =4; s: =1; while i =9 do begin s: =s+i; i: =i+2; end; writeln ( s= ,s); end....
София5778 София5778  25.09.2019 06:50
Рассказ, набранный на компьютере, содержит 4 страницы, на каждой странице 48 строк, в каждой строке 64 символа. определите информационный объём рассказа в кодировке koi8-r, в которой...
shahriyorchikozb8ts shahriyorchikozb8ts  25.09.2019 06:50
Какое количество информации содержит 2 минутный цветной фильм, если один его кадр содержит 256 кб информации, а за 1 секунду сменяется 24 кадра (ответ указать в мб...
slava20syper slava20syper  25.09.2019 06:50
Протокол интернет- a)набор общепринятых правил, определяющих механизм взаимодействия компьютеров в сети. b)набор общепринятых правил, определяющих механизм общения пользователей...
avasjanom avasjanom  25.09.2019 06:50
Выбери два слова подходящих по смыслу из двух групп. 1 группа позиция, верхний, , программа, список, линейка. 2 группа маркер, табулостоп, интерфейс, регистр, расклад, курсор....
Ооггод Ооггод  25.09.2019 07:00
Найдите ошибку в программе pascal : дано: a,b,c,d. найти: среднее значение чисел принадлежащих интервалу(1; 30) и кратных 3. program zaschita; var s,k,a,b,c,d: integer; sr: real;...
45667889 45667889  25.09.2019 07:00
Какое число будет выведено на экран компьютера в результате выполнения фрагмента программы? a: =6 ; b: =9 ; if (b/3 =a-2) or (a*2 b) then begin b: =b*a; a: = (b-3)/(a+11); end...
arinakirkot arinakirkot  25.09.2019 07:00
Одномерный массив f заполнен числами: 6, 5, 3, 10, 4. какое число будет напечатано на экране после выполнения фрагмента программы? k: =1; for i: =1 to 5 do if f[i] mod 5 = 0 then...
Trasir Trasir  25.09.2019 07:00
Кустройствам ввода информации нельзя отнести устройство: a)( )световое перо. b)( )клавиатуру. c)( )трекбол. d)( )дискету. устройство вывода можно использовать для ввода информации:...
DeathStroke11 DeathStroke11  25.09.2019 07:00
Цветное с палитрой 256 цветов изображение имеет размер 25х25 точек. какой информационный объем в байтах имеет изображение?...

Популярные вопросы