Странный у тебя программист -_-
Но он забыл поставить ;
Вот правильный код:
Program name;
var a,b,s,p:real;
begin
a:=8;
b:=3;
p:=(a+b)*2;
s:=(a*b);
write('P=',p,' S=',s)
end.
Ответ:
При вычислении периметра в конце нет ";".
Объяснение:
В конце каждой строки кода, кроме некоторых элементов, таких как "begin", "end", и циклов с условиями, должны стоять точка с запятой, означающие конец строки.