Viết chương trình N số nguyên. Tính a, biết a=1 : N giúp mình câu này với ạ do mình chưa hiểu tin lắm
2 câu trả lời
program bai_giai;
uses crt;
var n:longint; a:real;
begin
clrscr;
write('nhap n:');readln(n);
a:=1/n;
write('a=',a);
readln
end.
Gửi bạn:
uses crt;
var i,N : Integer;
a: real;
begin
clrscr;
writeln('nhap n:'); readln(n);
a:=i/n;
writeln('a=',a);
readln
end.
CHÚC BẠN HỌC TỐT