Нужно составить програмку, чтоб решить пример:
39*54-84 в квадрате.
Program product;
var
a,b,c:integer;
a:=39*54-sqr(84));
readln
end.
Напишите ошибку, ну и объясните, если не сложно)
var a,b,c:integer;
Begin
a:=39*54-sqr(84);
writeln(a);
Вывод отстутсвует, отсутствует начало программы 'Begin'
uses crt;
clrscr;
readkey;
end