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

begin и end в принципе в основной программе можно убрать,т.к там одно действие

В первой строке вставьте букву n   iteger=integerВо второй строке после слова begin нажмите на ENTER (или ПРОБЕЛ)В конце третьей, пятой и седьмой строках добавьте точку с запятой (;)Удалите четвертую снизу строку, то есть слово begin

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