Lập trình nhập vào một số nguyên dương n, cho biết các số nguyên tố từ 1 đến n. (Lưu ý chỉ sử dụng vòng lặp while…do)

0 bình luận về “Lập trình nhập vào một số nguyên dương n, cho biết các số nguyên tố từ 1 đến n. (Lưu ý chỉ sử dụng vòng lặp while…do)”

1. uses crt;

   var n,i:integer;

   begin

   clrscr;

   write(‘Nhap n: ‘);readln(n);

   i:=1;

   while i<=n then 

     begin

     write(i,’  ‘);

     i:=i+1;

     end;

   readln;

   end.

   Bình luận