Найти площадь грани, площадь полной поверхности и объем куба

@plsap · Регистрация: 26.10.2015

Author24 — интернет-сервис помощи студентам

3. Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем этого куба.

@Peoples · 24.02.2016, 20:22

Pascal

program pr;
var
l,sg,v,sp:integer;
begin
writeln('Введите длину ребра куба');
readln(l);
sg:=l*l;
sp:=6*l*l;
v:=l*l*l;
writeln('Площадь грани: ',sg);
writeln('Площадь поверхности: ',sp);
writeln('Объём: ',v);
end.

@dgzpv · 24.02.2016, 20:22

Pascal

program ine;
var a, res1, res2, res3 : real;
begin
writeln('Введите ребро куба');
readln(a);
res1 := a * a;
writeln('Площадь грани =',res1);
res2 := a * a * 6;
writeln('Площадь полной поверхности =',res2);
res3 := a * a * a;
writeln('Объем куба =',res3);
end.

Найти площадь грани, площадь полной поверхности и объем куба

Решение

Решение

@plsap -8 / 0 / 0 Регистрация: 26.10.2015 Сообщений: 100
		1
	Найти площадь грани, площадь полной поверхности и объем куба 24.02.2016, 19:48. Показов 12107. Ответов 2 Метки нет (Все метки) 3. Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и объем этого куба. 0

	24.02.2016, 20:22