Nhập vào 1 số nguyên gồm 4 chữ số: Kiểm tra tình chẵn lẻ Kiểm tra xem có phải là số nguyên tố không Kiểm tra xem có phải là số hoàn hảo không

duyenle9393

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 33 xem

1 trả lời

Thích Trả lời

thuhuonglove76

uses crt;

var n,i:integer;

ok:boolean;

BEGIN

clrscr;

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

if n mod 2=0 then writeln('So ',n,' la so chan')

else writeln('So ',n,' la so le');

if n<2 then write('So ',n,' khong la so nguyen to')

else

begin

ok:=true;

for i:=2 to trunc(sqrt(n)) do

if n mod i=0 then

ok:=false;

if ok then

writeln('So ',n,' la so nguyen to')

else

writeln('So ',n,' khong la so nguyen to');

end;

readln;

END.

Vote (0) Phản hồi (0) 2 năm trước

1060621637648945

uses crt;
var n,i,s,d:longint;
kt:boolean;
begin
clrscr;
write('Nhap so co 4 chu so: '); readln(n);
for i:=1 to n do if n mod 2=0 then kt:=true;
if kt=true then writeln(n,' la so chan')
else kt:=false;
if kt=false then writeln(n,' la so le');
if n<2 then write(n,' khong phai la so nguyen to');
for i:=2 to n do if n mod i=0 then inc(d);
if d=2 then kt:=true
else kt:=false;
if kt=true then writeln(n,' la so nguyen to')
else if kt=false then writeln(n,' khong la so nguyen to');
for i:=1 to n div 2 do if n mod i=0 then inc(s,i);
if s=n then
begin
kt:=true;
writeln(n,' la so hoan hao');
end
else
begin
kt:=false;
if kt=false then writeln(n,' khong la so hoan hao');
exit;
end;
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

C. learning foreign languages D. watching TV. IV WRITING: a. Rewrite the sentences without changing the meaning. (5 x 0,4= = 66. Although Sue felt tired, she stayed up late talking to Jill. --> Despite 67. It was a hot day so we had lunch outside in the garden. --> It was such 68. I've been working for this company for ten years. --> I started 69. I'm sorry that I didn't finish my homework last night. --> I wish...... 70. Reading scientific books is one of my interests. --> I'm.... þ. Write complete sentence using the suggested words. (5 x 0,

Cách tạo ra dòng điện xoay chiều trong máy phát điện xoay chiều

Có ai ở Bình Chánh HCM k ạ, em có mấy tấm hình trên máy mà muốn in ra thành card thì đi đâu cho gần ạ? Em học ở THCS Võ Văn Vân, có ai ở gần mà làm được thì ib ins em nha. Ins:lalalalalisa_711. AVT là lisa Vẽ đậu mầm

Tại khu di tích Chủ tịch Hồ Chí Minh ở Hà Nội, bên ngôi nhà sàn của Bác Hồ có một cây vú sữa do đồng bào miền Nam gửi tặng Bác (qua những chiến sĩ tập kết ra Bắc sau Hiệp định Giơ-ne-vơ). Em có suy nghĩ gì về tình cảm của đồng bào miền Nam đối với Bác Hồ nói riêng và nhân dân miền Bắc nói chung?

Bài tập cuối khoá: Lựa chọn, sử dụng PP và KTDH của một chủ đề/bài học trong môn Đạo đức ở tiểu học.Hướng dẫn làm bài tập: + Lựa chọn một chủ đề/bài học trong chương trình GDPT 2018 - môn Đạo đức. + Lựa chọn, sử dụng PP, KTDH theo quy trình đã tìm hiểu. + Thể hiện việc lựa chọn, sử dụng, PP, KTDH thông qua chuỗi hoạt động học. + Trình bày bằng dạng văn bản. + Nộp tập tin Kế hoạch bài dạy.

Các chiến dịch của bộ đội chủ lực Việt Nam trong cuộc kháng chiến toàn quốc chống thực dân pháp xâm lược (1946-1954) đều A.Kết hợp đánh du kích, phục kích với công kiên B.Nhằm giữ vững quyền chủ động chiến lược trên chiến trường chính bắc bộ C.Có bước phát triển về hướng tiến công chủ yếu D.từng bước làm phá sản kế hoạch đánh nhanh thắng nhanh của thực dân Pháp

mn ơi giúp mk câu nek vs ạ !! Gấp lắm ròi ạ 😢 nhanh nhanh ạ

7) If she needs a radio, she ( borow) ...................mine 8) If he (read) ......................... in bad light , he will ruin his eyes 9)( you/phone).......................me tomorrow If you (have) ................... (time) 10) Do you want to watch Tv ? - I (swith) .................... it on if you (do) ........................ 11) If Tam (not apologise) .............................. to me, I (not speak)...............................to him amymore 12) If I( not be) ..........................too busy tomorow , (visit) ..................... you

Khi vào phòng thi thì bạn mong muốn điều gì nhất? Đc ngồi cạnh HSG toàn diện? Trong phòng toàn hsg? Hay có thể chép phao mà thầy cô ko phát hiện?,... Còn tôi thì mong rằng: Đc những thầy cô sau đây coi thi: cô Bắc, thầy Nguyên, thầy Tĩnh, thầy Hảo. Lí do: dạo này coi thi chỉ có 1 thầy (cô), (hôm qua đc 1 thầy (cô) coi nên dự đoán là v), và những thầy cô đó (đã nêu) gọi là: nói chuyện lúc khi thi=> vẫn ko nói gì, chỉ bt bấm đt:); trao đổi thoải mái=> vẫn ko nói gì,... Vẽ anime (nữ, oc, full line, full màu (màu marker, giấy xịn, giấy cũng xịn UvU)

Mn giúp em với ạ. Em cần gấp lắm ạ

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến