Question

Написать программу, которая запрашивает у пользователя длину и ширину участка в метрах и выводит на экран площадь этого участка в кв. м. в языке Паскаля

Answer 1

Ответ:

program Example;

var

 a, b: Double;

begin

 Write ('Введите длину и ширину участка: ');

 ReadLn (a, b);

 WriteLn ('Площадь = ', (a + b) * 2 :10 :2);

  ReadLn;

end.