Question

Укажите ошибки в следующей программе, объясните. (40б)

Второе задание на фото

Answer 1

Відповідь:

Var a,b,P:real;

Begin

 writeln(' Введіть ісходні дані:');

 write('Довжина (см) –> ');read(a);

 write('Ширина (см) –> ');read(b);

 P:=(a+b)*2;

 Writeln('Периметр = ',P:1:2,' см.');

end.