Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Народ выручайте надо к завтрашнему дню. Дано n = 8. Вычислить n-е значение переменной z.

Ответ оставил Гость

Program isch;
Varx,y,z,k,n:integer;
Begin
x:=2;y:=3;k:=1;n:=8;
if (k<=n) then
 begin z:=3*y+4*x+1;
x:=y;
y:=z;
k:=k+1;
end;
writeln(z=,z, x=,x, y=,y, k=,k);
end.
Делал строго по алгоритму...