Помогите пожалуйста написать програму по задаче для Паскаля.
Определить количество сетки (b), которой необходимо загородить сад прямоугольной формы, со сторонами а и b метров и количество минеральных удобрений (d) для сада, если их выход (с) килограмм на метр квадратный.
а:=24
b:=50
c:=2.5

var a,b,s,c,d:real;beginwrite('a, b: ');readln(a,b);write('c: ');readln(c);s:=2*(a+b);writeln('Количество сетки: ',s:5:1,' м');d:=a*b*c;writeln('Количество минеральных удобрений: ',d:5:1,' кг');end.Пример:a, b: 24 50c: 2.5Количество сетки: 148.0 мКоличество минеральных удобрений: 3000.0 кгИли так (без ввода данных):var a,b,s,c,d:real;begina:=24;b:=50;c:=2.5;s:=2*(a+b);writeln('Количество сетки: ',s:5:1,' м');d:=a*b*c;writeln('Количество минеральных удобрений: ',d:5:1,' кг');end.Результат:Количество сетки: 148.0 мКоличество минеральных удобрений: 3000.0 кг