ПОМОГИТЕ ПОЖАЛУЙСТА, СРОЧНО!!!!!! Встречено '(', а ожидалось '.' (с 14-ой строчки мне пишет это)
вот вся программа:
program figura2;
uses crt, GraphABC;
var r1,r2,a,b:integer;
S:real;
begin
SetWindowSize(350,350);
SetPenWidth(3);
line(110,50,270,50);
line(110,170,270,170);
circle(110,110,20);
circle(270,110,20);
arc(110,110,60,90,270);
(110,110)
(90,270)
arc(270,110,60,270,90);
(270,110)
(270,90)
a:=8,b:=6;
r1:=1;r2:=3;
S:=a*b+pi*r2*r2-2*pi*r1*r1;
write('S=',S:2:2);
end.