Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
27 декабря 2022 09:23
814
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
Остались вопросы?
Еще вопросы по категории Информатика
Дан фрагмент программы: read (a); read (b); c:=a+b; write (a, b); write (c) Упростите его, сократив число операторов ввода и вывода. Дан фрагмент прог...
Программист Петя пишет сортировку методом выбора. Пока что он реализовал только фрагмент, в котором в списке ищется минимальный элемент, который затем...
Определите количество цветов в палитре при глубине цвета 4, 8, 16, 24, 32 бита....
Чем отличается имя папки от имени файла?...
Какой из объектов может являться исполнителем алгоритмов? ножницы карта принтер книга...