program
eq
;
var
x
,
y
,
z
:
real
;
begin
x
:=
1
;
y
:=
5
;
z
:=
10
;
x
:=
y
*
z
;
writeln
(
x
);
end
.