Показать сообщение отдельно
Старый 20.02.2011, 16:29   #2 (permalink)
shrek=)
Студент БГПУ
 
Аватар для shrek=)
 
Регистрация: 06.02.2010
Сообщений: 420
Записей в дневнике: 3
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 470
По умолчанию

Пожалуйста:
Код:
const
r1=5.2;
r2=4;
r3=4.8;
var
r:real;
function v(r:real):real;
var
v1,v2,v3,v,z:real;
begin
v:=(4/3)*(pi*(sqr(r)*r));
writeln ('v=',v);
 v1:=(4/3)*(pi*(sqr(r1)*r));
v2:=(4/3)*(pi*(sqr(r2)*r));
v3:=(4/3)*(pi*(sqr(r3)*r));
z:=(v1+v2+v3)/3;
writeln ('z=',z);
end;
begin
write('r=');
readln(r);
v(r);
readln
end.
shrek=) вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070