Лучшие помощники
- Megamozg 2200 б
- Matalya1 1800 б
- DevAdmin 1700 б
- arkasha_bortnikov 890 б
- Dwayne_Johnson 860 б
27 декабря 2022 09:23
714
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
Остались вопросы?
Еще вопросы по категории Информатика
Соответствует двоичный код: 010 101 101 101 101 010. ...
/*14.1. Бонни и Клайд (6) Задача выполнена студентом ПС 21 Желаевым Денисом. Бонни и Клайд задумали ограбить в некотором городе два банка. Все N банк...
“Крестьянину нужно перевезти через реку волка, козу и капусту. Но лодка такова, что в ней может поместиться только крестьянин, а с ним или один волк,...
какая конструкция представлена? begin s:=0; for k:=6 to 12 do s:=s+10; writeln(s); end. 1)следование 2)ветвление 3)повторение...
Напишите программу, которая выводит на экран таблицу степеней двойки( от нулевой до десятой)...
Все предметы