Bài 9. Làm việc với dãy số

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Gia Nhĩ Vương

Viết chương trình đếm các số nguyên tố trong khoảng a đến b với a<b và a,b là 2 số nguyên được nhập từ bàn phím

Gia Nhĩ Vương
19 tháng 4 2019 lúc 11:27

khocroi help

Gia Nhĩ Vương
19 tháng 4 2019 lúc 11:27

khocroi

Gia Nhĩ Vương
19 tháng 4 2019 lúc 11:27

huhu

Minh Lệ
19 tháng 4 2019 lúc 13:30

Lời giải :

program hotrotinhoc ;

var a,b,i,dem : integer ;

kt : boolean ;

begin

kt:=true ;

write('a='); readln(a);

write('b='); readln(b);

if a=1 then kt:=false ;

dem:=0;

for i:= a to trunc(sqrt(b)) do

if b mod i = 0 then kt:= false ;

if kt = true then dem:=dem+1;

write('Co tat ca ',dem,' so nguyen to');

readln

end.


Các câu hỏi tương tự
minh dương
Xem chi tiết
Minh
Xem chi tiết
Hùng Anh Nguyễn Đăng
Xem chi tiết
Ly Khánh
Xem chi tiết
Nguyenthanh
Xem chi tiết
Nhàn Huỳnh
Xem chi tiết
Huyền Trần
Xem chi tiết
Tali
Xem chi tiết
Phúc Duyên
Xem chi tiết