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úc khi người dùng nhập số 0.
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úc khi người dùng nhập số 0.
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.