помогите пожалуйста. очень нужна помощь

chtotakoeeto: Фотография нечёткая(

jcjdsicsc: Дана программа. Введи данную программу в Паскаль.

program perimetr_1;
var
a,b,p:real;
begin
a:= 5;
b:= 13;
p:=2*(a+b);
writeln('p=',p:4:0)
end.

Полученный результат: (….)=(…..)