Можете мне помочь написать программу в Pascal, исходя из этой задачи:

коробка для подарка обклеивается бумагой, высота, ширина, длина коробки вводится с клавиатуры, найти площадь необходимой бумаги(площадь куба, видимо) и сумму длин всех рёбер

1

Ответы и объяснения

2013-10-21T15:09:58+00:00
Var a,b,c,s,sum:real;
beginwriteln('Введите длину рёбр');
readln(a,b,c);
s:=2*a*b+2*b*c+2*a*c;
sum:=a+b+c;
writeln('Площадь бумаги=',s,'    Сума все рйбр=',sum);
end.