Надо составить программу: x=12; y: =x+3; x: =2*y; t: =x+y; y=t/y; вывод переменных: x, y, t

Var x,y,t:real;
begin
x:=12;
y:=x+3;
x:=2*y;
t:=x+y;
y:=t/y;
writeln('x = ',x,' y = ',y,' t = ',t);
end.

Результат:
x = 30 y = 3 t = 45