Κεφάλαιo 12

Primary tabs

Page 1 of 9

Question 1

Να γράψετε μια συνάρτηση για το ημιάθροισμα δύο αριθμών.

 

function half_sum(n1,n2);

var

n1,n2:real;
begin
half_sum:=(n1+n2)/2;
end;
 

 

function half_sum(n1,n2:real):real;
begin
half_sum:=(n1+n2)/2;
end;