Answers [ ]
khanhngan
2021-08-16T17:57:06+00:00
Program FNG;
Uses crt;
Var n,i,s: longint;
Begin
Clrscr;
Write[‘Nhap n: ‘]; Readln[n];
s:=0; i:=1;
While i
khanhngan
2021-08-16T17:57:06+00:00
Program FNG;
Uses crt;
Var n,i,s: longint;
Begin
Clrscr;
Write[‘Nhap n: ‘]; Readln[n];
s:=0; i:=1;
While i