Написать программу нахождения объёма и площади поверности прямоугольного параллелепипеда
Написать программу нахождения объёма и площади поверности прямоугольного параллелепипеда
Гость
Ответ(ы) на вопрос:
Гостьprogram superprogram;
var
a,b,c,d,m:integer;
begin
writeln ('Введите стороны a,b,c отделяя их пробелом');
readln (a,b,c);
d:=a*b*c;
writeln ('Объём - ', d);
m:=2*(a*b+ b*c+ a*c);
writeln ('Площадь поверхности -', m);
end.
Не нашли ответ?
Похожие вопросы