Информатика, опубликовано 2018-08-22 19:57:34 by Гость
Помогите плиз. Дана натуральная числовая последовательность из N чисел. Вывести значения элементов заданной последовательности в обратном порядке с помощью рекурсии.
Ответ оставил Гость
Type mas=array of integer;
procedure revers(var a:mas; i:integer);
begin
write(a[i], );
if i>0 then revers(a,i-1);
end;
var a:mas;
i,n:integer;
begin
readln(n);
setlength(a,n);
for i:=0 to n-1 do
read(a[i]);
revers(a,n-1);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на