Ошибки в программе:
Program primer - не хватает точки с запятой
Var a,b: integer;
Begin ; - не ошибка, необязательная точка с запятой
ReadLn( a,b); - не ошибка, лишний пробел после скобки, здесь и дальше не хватает пробелов между аргументами функций, знаками
s=a+b; - не хватает двоеточия в :=
m:=a*b;
d:=a:b; - переменная d не была описана; деление - это /
WriteLn(s);
WriteLn(m);
WriteLn(d)
End - не хватает точки.
Исправленная программа:
Program primer;
Var a, b: integer;
d: real;
Begin
ReadLn(a, b);
s := a + b;
m := a * b;
d := a / b;
WriteLn(s);
WriteLn(m);
WriteLn(d)
End.
f(2)=2*f(1)-g(1)=2-1=1
g(2)=f(1)+2*g(1)=1+2=3
f(3)=2*f(2)-g(2)=2*1-3=-1
g(3)=f(2)+2*g(2)=1+2*3=7
f(4)=2*f(3)-g(3)=2*(-1)-7=-9
g(4)=f(3)+2*g(3)=-1+2*7=13
f(5)=2*f(4)-g(4)=2*(-9)-13=-31
g(5)=f(4)+2*g(4)=-9+2*13=17
g(5)-f(5)=16-(-31)=16+31=47
ответ: 47