Program c; var a,b,c: iteger; beginwriteln ('введите длину прямоугольника'); read (a) writeln ('введите ширину прямоугольника'); read (b) begin c: =a*b writeln('площадь прямоугольника=',c); end. как правильно написать программу,пишет что ошибка , программа паскаль.