подскажите решение проблемы Опции

[Dorash87]

Подскажите как зделать. Вот простая задача:

Program 1
var
x: integer;
a,b,c,d,e,f: real;
begin
write('x=');
read(x);
a:=......
b:=......
c:=......
d:=......
begin
if x<740 then
e:=......
if x>=740 then
e:=.....
end;
f:=....
writeln ('a=',.....)
writeln ('b=',.....)
writeln ('c=',.....)
writeln ('d=',.....)
writeln ('e=',.....)
writeln ('e=',.....)
writeln ('f=',.....)
end.

При вводе значения х надо вывести вычисления a,b,c,d,e,f но не получаеться с значением e подскажите как зделать!

[мисс_граффити]

Что именно? 3 не кратно 2 вне зависимости от компилятора, насколько мне известно.
И даже четность количества скобок - не гарантия успешной компиляции.