2)...

July 2022 1 10 Report

Используя подпрограмму (корень из 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.

0 votes Thanks 1

Околус Спасибо огромное