Паскаль, пожалуйста помогите.
Составить программу.
Задача: Найти поверхность и объём прямого параллелепипеда.

Весь массив в текстовом файле.Остается только открыть копировать в паскаль и поставить числа

исходные : 15 , 16,20

в текстовом файле массив,просто подставь туда числа,куда подставлять по русски написанно)

Интересно, где Вы там обнаружили массив, хех?

Ну ошибся,в чем проблема? все ведь правильно)

тут можно было и не указывать вид паскаля, ведь написано в старом стиле. указывать надо когда в стиле .Нет написано

program ololo;uses crt; var    w:integer;    a,s,b,c,v:real; begin repeat Writeln(''); Writeln(''); Writeln('Ввод значений сторон - 1'); Writeln('Вычислить объем - 2'); Writeln('Вычислить площадь - 3'); Writeln('Завершить программу -4'); Writeln('_________________________'); Readln(w); case w of 1:begin clrscr;   Writeln('Ввод стороны A');   Readln(a);   Writeln('Ввод стороны B');   Readln(b);   Writeln('Ввод сторны C');   Readln(c);   end;   2:begin clrscr;   v:=a*b*c;   Writeln('Объем фигуры равен =',v);   end;   3:begin clrscr;    s:=2*((a*b)+(b*c)+(a*c));    Writeln('Площадь фигуры равна =',s);   end;   end; until w=4; end.

//Pascal ABC.NET v3.1 сборка 1172Var a,b,c:real;begin read(a,b,c); writeln('S=',2*(a*b+b*c+a*c)); writeln('V=',a*b*c);end.Пример ввода:123Пример вывода:S=22V=6