вычисления по формулам

[ylasss]

Вычисления по формулам в Турбо Паскале.
Вычислить значения переменных по заданным расчетным формулам и наборам исходных данных. Вывести на печать значения вводимых исходных данных и результаты вычислений, сопровождая вывод наименованиями вводимых переменных.
Расчетные формулы Значения исходные
х=[х1+γх2]/(1+γ)
y=[y1+γy2]/(1+γ) x1=5
x2=25
y1=15
y2=35
γ=2/3

[Mad_Cat]

язык то какой?

[ylasss]

турбо паскаль

[ylasss]

кто нибудь может подсказать?

[ylasss]

помогите пожалуйста в паскале полный ноль(((

[SemAlley]

var x, x2, y, y1, y2, yy: integer;
begin
x2:=25;
y1:=15;
y2:=35;
yy:=2/3;
x:=(x1+yy*x2)/(1+yy);
y:=(y1+yy*y2)/(1+yy);
writeln("x= ", x);
writeln("y= ", y);
end.

Вроди так, непомню как там точно.

[ylasss]

выдает ошибку несоответсвие типа(

[ylasss]

выдает ошибку не соответсвие типа(

[VIK_aka_TOR]

держи:

var  x1, x2, y1, y2: integer;
x, yy, y: real;
begin
x1:=5;
x2:=25;
y1:=15;
y2:=35;
yy:=2/3;
x:=(x1+yy*x2)/(1+yy);
y:=(y1+yy*y2)/(1+yy);
writeln('x= ', x);
writeln('y= ', y);
end.

[ylasss]

спасибо огромнейшее все получилось!!!!!!