ПОМОГИТЕ ПОЖАЛУЙСТА, СРОЧНО!!!!!! Встречено '(', а ожидалось '.' (с 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.

я убрал эти 4 строчки и теперь у меня новая ошибка в 5-ой строчке в конце(a:=8,b:=6;), теперь мне пишет : Встречено ',', а ожидалось ';'

так поставь ';' вместо ','. Для паскаля такое присвоение - 2 различных инструкции, они должны отделяться символом ','

ой, символом ';'

я не много не понял где что надо поменять

аааа все понял, спасибо

а что это у тебя:(110,110)(90,270)и это(270,110)(270,90)?