uses crt;
var i,n,dem:integer;
begin clrscr;
write('nhap so nguyen duong n =');
readln(n);
dem:=0;
for i:=1 to n do if n mod i=0 then dem:=dem+1;
if (n<2) or (dem<>2) then writeln(n, 'khong phai la so nguyen to') else if dem=2 then writeln(n, 'la so nguyen to');
readln
end.
Cho mình 5 sao + câu tl hay nhất nha <3
Program Hotboy ;
Uses crt;
Var n, i: integer;
Kt: boolean;
begin
Kt:=true;
Write('Nhap n tu ban phim : ');
Readln(n);
For i:= 2 to n - 1 do if ( n mod i = 0) then
Kt :=false;
If Kt then write(n,' la so nguyen to')
Else
Write(n, ' khong la so nguyen to');
Readln
End.
khử 12g sắt (III) oxit bằng 0,56l khí H2 (dktc) a)viết pt b)tính m chất dư c)MFe=? giúp mình với :< mai mìnhkk ktra r
viết 1 đoạn văn ngắn khoảng 5 câu có sử dụng ít nhất 1caau đặc biệt
Viết một bài văn nghị luận về môi trường( đang cần gấp ạ, ko chép mạng nha,xin cám ơn)
vai trò của lớp lưỡng cư đối với đời sống con người
Rút gọn biểu thức sau: 3 - 3 mũ 2+3 mũ 3 - 3 mũ 4+...........+3 mũ 2015 - 3 mũ 2016 mọi người giúp mình với đang cần gấp ạ
cảm nhận vẻ đẹp cảu bài ca dao trong đầm gì đẹp bằng sen (ko chép mạng) nếu chép mik sẽ báo cáo
Em hay tim cac cau ghep trong bai mot vu dam tau va phan tich cau do
câu 1 neu các đk để lập vươn gieo ươm cây dùng.câu 2 nêu 1 số loại khai thác rừng và đk áp dụng khai thá rừng nước ta hiện nay .câu 3 việc khai thác rừng phải luôn tuân theo các quy định chung nhằm mục đích gì? câu 4 ngững đối tượng nào được chọn để khoanh nuôi phục hồi rừng . câu 5 nêu vai và trò nhiệm vụ chăn nuôi của nước ta hiện nay.câu 6 thế nào đc gọi là sự sinh trưởng và sự phát dục của vật nuôi . câu 7 các yếu tố tác động đến sự sinh trưởng và sự phát dục của vật nuôi. câu 8 những biên nào của cơ thể vật nuôi thuốc sự sinh trưởng và suej phát dục
giúp mình làm bài 2 với mọi người ơi mọi người
Chứng minh biển Việt Nam có tài nguyên phong phú ? ( Ngắn gọn , nêu đủ các ý chính , ko sao chép lẫn nhau hay copy trên mạng )
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
