Используя подпрограмму (корень из n+ n) решить: (корень из 5 +5/2)+(корень из 3+3/2)+(корень из 7+7/2)
Используя подпрограмму (корень из n+ n) решить:
(корень из 5 +5/2)+(корень из 3+3/2)+(корень из 7+7/2)
Ответ(ы) на вопрос:
var
r:real;
function preob(n:integer):real;
begin;
preob:=sqrt(n)+n;
end;
begin
r:=preob(5)/2+preob(3)/2+preob(7)/2;
writeln(r);
end.
Не нашли ответ?
Похожие вопросы