Написать программу решения следующей задачи: Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = a·b·c и площадь поверхности S = 2·(a·b + b·c + a·c)
Написать программу решения следующей задачи: Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V = a·b·c и площадь поверхности S = 2·(a·b + b·c + a·c)
Гость
Ответ(ы) на вопрос:
ГостьСкриншот кода и сама программа ниже:
ГостьProgram x; Uses crt; Var a,b,c,V,S:integer; Begin Writeln ('Введите значения a,b,c'); Readln (a,b,c); V:=a*b*c; S:=2·(a·b + b·c + a·c); Writeln ('Объем='',V); Writeln ('Площадь поверхности ='',V); end.
Не нашли ответ?
Похожие вопросы