В прошлом классе писал эту работу;) Ответ: ГБДАДА
Таблицы - во вложении.
Пустые ячейки означают, что значение переменной ещё не определено
ПланшеТелефоНоутбук. Ноутбук начинается с В. Планшет с А.
function G(n: integer): integer; forward;
function F(n: integer): integer;
begin
if n = 1 then result := 1
else result := F(n - 1) - G(n - 1)
end;
function G(n: integer): integer;
begin
if n = 1 then result := 1
else result := F(n - 1) + 2 * G(n - 1)
end;
begin
Println(F(5)/G(5));//-2
end.
Program n1;
var sum,a: real;
i: integer;
begin
i:=0;
sum:=0;
while i<10 do
begin
readln(a);
sum:=sum+a;
i:=i+1;
end;
write(sum);
end.