Предмет: Информатика,
автор: abc0707
помогите составить программу на языке ПАСКАЛЬ!
Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти
его объем V = a·b·c и площадь поверхности S = 2·(a·b + b·c + a·c).
Ответы
Автор ответа:
0
var a,b,c,v,s : real;
begin
writeln('Vedite a b c');
readln(a,b,c);
v:=a*b*c;
s:=2*(a*b+b*c+a*c);
writeln('V=',v,' S=',s);
end.
begin
writeln('Vedite a b c');
readln(a,b,c);
v:=a*b*c;
s:=2*(a*b+b*c+a*c);
writeln('V=',v,' S=',s);
end.
Автор ответа:
0
spasibo)
Интересные вопросы
Предмет: Русский язык,
автор: perviychelovek35
Предмет: Биология,
автор: KaLaChlol
Предмет: История,
автор: blackpink88
Предмет: Химия,
автор: irinalisichkin
Предмет: Литература,
автор: 5721