Вычислить объем куба

06.06.2013, 07:39. **Показов** 7292. **Ответов** 2

вычислить объем куба. Числа пользователь вводит сам.

@Midian · 06.06.2013, 13:22

Писал на Pascal ABC, если будет ругаться на power, тогда вверху программы допишите uses math;

Pascal

var
h: real;
begin
write('Введите высоту ребра куба: ');
readln(h);
writeln('Объем куба = ',power(h,3));
end.

Новичок · 06.06.2013, 17:00

Лучше уж так.

Pascal

var h: real;
begin
write('Введите высоту ребра куба: ');
readln(h);
writeln('Объем куба = ',h*h*h:0:2);
end.

Дарья Генкал
		1
	Вычислить объем куба 06.06.2013, 07:39. Показов 7292. Ответов 2 Метки нет (Все метки) вычислить объем куба. Числа пользователь вводит сам.

	06.06.2013, 17:00

Решение