a)Viết chương trình để người dùng nhập số khác 0 rồi tính và in ra màn hình tổng các nghịch đảo(nghịch đảo của số N là 1/N). b)Chương trình chỉ kết th

Program hotrotinhoc;

var i,n: ineger;

s: real;

begin

s:=0;

write(‘Nhap so nguyen :’); readln(n);

if n<>0 then s:=s+1/n;

while n<>0 do

begin

write(‘Nhap so nguyen :’); readln(n);

if n<>0 then s:=s+1/n;

end;

write(Tong cac so nghich dao la : ‘,s);

readln

end.