Var i,n,d:integer;
Begin
Write('Nhap so can kiem tra ');readln(n);
For i:=1 to n do
If n mod i = 0 then d:=d+1;
If d = 2 then write(n,' la so nguyen to')
Else write(n,' khong la so nguyen to');
Readln
End.
Viết CT nhập vào một số, kiểm tra xem số đó có phải là số chính phương ko ? (Sử dụng câu lệnh lặp nha mấy bạn.) Ai bt thì cho mình câu hỏi. Cảm ơn nhìu
Viết CT nhập vào một phân số, kiểm tra xem phân số đó có tối giản hay ko ?
Ai bt thì làm ơn giúp nha <3 <3
viết chương trình kiểm tra một số có phải là số nguyên tố không( sử dụng For to do)
VCT pascal kiểm tra số n có phải là số nguyên tố không
VCT pascal kiểm tra số n có phải là số hoàn hảo không
VCT pascal kiểm tra số n xuất ra màn hình các số nguyên tố từ 2 đến n
Viết CT nhập điểm Kiểm tra học kì môn Tin cho N học sinh và in CT với N và điểm kiểm tra nhập từ bàn phím (sd biến mảng)
Giusp mik với ạ, mk đang cần gaapsppppp lamwsmmmm ạ!!!
Viet chương trình nhập vào từ bàn phím một số tự nhiên. Kiểm tra số đó có phải số nguyên tố hay ko.
Giúp mk nha. Thanks trước.
Giúp mik vs ạ
Viết chương trình vào 1 số nguyên kiểm tra xem có phải là số nguyên tố chẵn hay lẻ?????
Mai mik ktra rùi huhuhuhuhuuhuh
vết chương trình nhập vào số n,kiể tra n có phải là số nguyên tố hay không?
sử dụng while....do
Nhân 1 số nguyên dương n, hãy kiểm tra n có phải là 1 số hoàn hảo không .gợi ý số hoàn hảo là số có tổng các ước (ngoại trừ nó) bàng chính nó
Vd: 6 có Ư{1;2;3}
