Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 895 б
- Dwayne_Johnson 865 б
27 декабря 2022 09:23
765
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
Остались вопросы?
Еще вопросы по категории Информатика
Юра сказал маме: "Хочу яблоко". Она принесла ему очищенное яблоко. На другой день Юре подарили робота. Он опять сказал: "хочу яблоко". Но робот не сдв...
Помогите составить алгоритм .. по информатике, 3 класс...
Иногда выводит ошибку: Ошибка времени выполнения, индекс находится вне границ массива. PascalABC.NET вот само задание: Дан массив А(n). Поменять места...
1.Почему следует придерживаться единого стиля при создании текстового документа? 2. Что такое шаблон документа? 3.Чем маркированный список отличаетс...
Что больше? 100 кбайт * 0,1 мбайт...