Даны длины ребер а, b,c прямоугольного параллелепипеда. найти его объем v=a умножить b умножить c и площадь поверхности s= 2 умножить (а умножить b + b умножить c+ a умножить с)

Karelina1988 Karelina1988    2   19.05.2019 00:30    0

Ответы
murrrКотя murrrКотя  12.06.2020 06:01

var
    a, b, c: real;

begin
    read(a, b, c);
    writeln('V=', a * b * c);
    writeln('S=', 2 * (a * b + b * c + a * c));
end.

ПОКАЗАТЬ ОТВЕТЫ
snezhanashikolai snezhanashikolai  12.06.2020 06:01

var

a,b,c,V,S:integer;

begin

readln (a,b,c);

V:=a*b*c;

S:=2*(a*b+b*c+a*c);

writeln ('V=',V);

writeln ('S=', S);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика