1 câu trả lời
Program baitap;
Uses crt;
Var i,N: integer;
S: real;
Clrscr;
N:=10;
S:=1;
For i:=1 to N do S:=S*1/N;
Writeln('Ket qua cua bieu thuc la:',S);
Readln;
End.
Câu hỏi trong lớp
Xem thêm
