Пощадь поверхности и обьем шара

@Elatriel · Регистрация: 02.09.2014

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

Пожалуйста пмогите пощадь поверхности шара и обьем шара найти. программу в турбо паскале....

@witcher31 · 28.09.2012, 06:52

Pascal

 program z1;
var s,r,v: real;
begin
write(' введите радиус шара r');
readln(r);
S:= 4* pi * sqr(r); // Площадь поверхности шара
v:= 4/3 * pi* (sqr(r)* r); // Объем шара
writeln (' s= ' , s:5:3, ' v=' , v:5:3);
readln;
end.

@Elatriel 0 / 0 / 0 Регистрация: 02.09.2014 Сообщений: 3
		1
	Пощадь поверхности и обьем шара 28.09.2012, 04:03. Показов 1741. Ответов 1 Метки нет (Все метки) Пожалуйста пмогите пощадь поверхности шара и обьем шара найти. программу в турбо паскале.... 0

	28.09.2012, 06:52

Пощадь поверхности и обьем шара

Решение