Вычислить y= 3k! +t! с функции. вот код var y, k, t: integer; function fact(k, t: integer): integer; begin if k=1 then fact: =1 else fact: =fact(3*k-1)*k; begin if t=1 then fact: =1 else fact: =fact(t-1)*t; end; end; begin write('vvedi chislo: '); readln(k, t); y: = fact(3*(fact(+fact(t); writeln('otvet', y); readln; end. можете разобраться почему в 6 строке выдает ошибку?
function fact(n:integer):integer;
begin
if n=1 then
fact:=1
else fact:=n*fact(n-1);
end;
begin
write('vvedi chislo:');
readln(k, t);
y:= 3*fact(k)+fact(t);
writeln('otvet ', y);
readln;
end.