viết ct nhập vào số từ nhiên n từ bàn phím và kiểm tra xem n có phải là số nguyên tố ko?(dùng lệnh while...do)
2 câu trả lời
#gửi bạn bài nhá
uses crt;
var n,i : longint;
begin
write('nhap n : ' );
readln(n);
i:=2;
while ( n mod i <> 0 ) and (i<n) do
i:=i+1;
if(i<n) then write( 'khong la so nguyen to ',n)
else
write('la so nguyen to ',n);
readln;
end.
#xin hay nhất , 5 sao , tym
Câu hỏi trong lớp
Xem thêm