Написать программу вычисления полной площади и объёма параллелепипеда,

Var a,b,c: real; begin write('длина = '); readln(a); write('ширина = '); readln(b); write('высота = '); readln(c); writeln('площадь полной поверхности = ',2*(a*b+b*c+c*a)); writeln('объём = ',a*b*c) end.

телефон      |         зонтик

наушник       |       спица

корпус         |       стержень

диск             |       купол

микрофон   |       рукоятка

провод         |       рубка

             

путь по озеру равен   v * t1

скорость при движении против течения равна  v - u

путь по реке равен  (v - u) * t2

общий путь, пройденный лодкой  s = v * t1 + (v - u) * t2