Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
27 декабря 2022 09:23
1024
3. Даны длины ребер a, b, c прямоугольного параллелепипеда. Найти его объем V и площадь поверхности S.Справка: V = a∙b∙c, S = 2∙(a∙b + b∙c + a∙c)
1
ответ
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,' s=',s);
end.
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,' s=',s);
end.
0
·
Хороший ответ
29 декабря 2022 09:23
Остались вопросы?
Еще вопросы по категории Информатика
Что такое поле? Какую информацию оно содержит?...
1. Факториалом числа п называется запись 1 х 2 х... x n. Обозначение: n! По данному натуральному числу и вычислить значение п! Пользоваться математиче...
Пожалуйста!! Запишите 32-битный IP -адрес в виде четырёх десятичных чисел, разделённых точками: 1) 11001100100110001011111001000111; 2) 11011110110...
Почему не ставятся связи у Ном_накл и Код_ск? Ключевые поля есть , Primary Key тоже Но все равно пишет,что "не обнаружен уникальный индекс для адресу...
Сколько раз выполняется цикл в фрагменте программы X:=8 WHILE X<20: X:=X+2...
Все предметы 
