Нужно составить програмку, чтоб решить пример:

39*54-84 в квадрате.

Program product;

var

a,b,c:integer;

a:=39*54-sqr(84));

readln

end.

Напишите ошибку, ну и объясните, если не сложно)

Program product;

var a,b,c:integer;

Begin

a:=39*54-sqr(84);

writeln(a);

end.

Вывод отстутсвует, отсутствует начало программы 'Begin'

Program product;

uses crt;

var a,b,c:integer;

clrscr;

Begin

a:=39*54-sqr(84);

writeln(a);

readkey;

end