ОТ Определите, что вызовет на экран программа при выполнении вызова F(9)? procedure F(n:integer);
Begin
If n>3 then begin
Write(n);
F(n div 3);
n:=n+1;
F(n-3);
end
else
write(n);
End;

116

341

Посмотреть ответы 1

Ответы на вопрос:

Наоя

Информатика

4,7(54 оценок)

var

a, b, c: array [1..10] of integer; //массивы

i: byte; //счетчик цикла

begin

for i : = 1 to 10 do

read (a[i]); //заполняем первый массив

for i : = 1 to 10 do

read (b[i]); // заполняем второй массив

for i : = 1 to 10 do

c[i] : = a[i]+b[i]; //суммируем элементы

end.

в программе не реализован вывод третьего массива на экран, т.к. это требование отсутствует согласно условию .

150 000+ пользователей

Оформить подписку