Bài tập và thực hành 5

BÀI T?P THỰC HÀNH SỐ 5
Yêu cầu:
Biết khai báo kiểu dữ liệu để giải những bài toán cụ thể.
Biết cách phân tích giải một bài toán với kiểu dữ liệu có cấu trúc.
?
(tiếp theo)
Bài 6b.Viết chương trình nhập từ bàn phím số nguyên dương N (N<=100) và dãy A gồm N số nguyên A1,A2,...AN có giá trị tuyệt đối không lớn hơn 1000. Hãy thông báo lên màn hình số lượng số nguyên tố trong dãy.
?
?
N là số nguyên tố khi nào?
Khi n không có ước, ngoài 1 và chính nó.
Nhắc lại thuật toán kiểm tra n là số nguyên tố hay không?
Kiểm tra
Nếu n=1 thì n không là nguyên tố
Nếu 1Nếu n>=4 kiểm tra n có ước trong phạm vi từ 2 đến phần nguyên căn bậc 2 của n hay không
+ Nếu có ước KL n không là nguyên tố
+ Ngược lại KL n là số nguyên tố
?
Ý tưởng giải bài toán?

- Dem:=0;
- Duyệt mảng A từ 1 đến n, trong quá trình duyệt kiểm tra
- Nếu a[i] là số nguyên tố thì dem:=dem+1;

?
Chương trình
var A:array[1..100] of integer;
i,n,k,dem:integer
Begin
write(`Nhap so PT`);readln(n);
for i:=1 to n do
begin
Write(`Nhap PT thu `,i,`la : `);
readln(a[i]);
end;

?
Dem:=0
for i:=1 to n do
begin
if (a[i]>1) and (a[i]<4) then dem:=dem+1;
if a[i]>=4 then
begin
k:=2;
while (k<=trunc(sqrt(a[i]))) and (a[i] mod k<>0)
do k:=k+1;
if k>trunc(sqrt(a[i])) then dem:=dem+1;
end; end;
write(`So luong so nguyen to `,dem);
readln;
end.
?
Bài 7: Dãy F là dãy Phi-bô-na-xi nếu:
F0=0; F1=1; FN=FN-1+FN-2 với N>=2
Viết chương trình nhập từ bàn phím số nguyên dương N và đưa ra màn hình số hạng thứ N của dãy Phi-bô-na-xi. Chương trình của bạn thực hiện được với giá trị lớn nhất N là bao nhiêu?
?
Yêu cầu của bài toán là gì?
Nhập N từ bàn phím
Đưa ra màn hình số hạng thứ N của dãy Fibonaxi
?
Sử dụng câu lệnh lặp gì để thể hiện chương trình?
Lặp For
Hoặc lặp while
?
Chương trình
Const max=10000;
Var F:array[0..max] of real;
i,N:integer;
Begin
write(`Nhap N`) ;readln(n);
f[0]:=0;f[1]:=1;
for i:=2 to n do f[i]:=f[i-1]+f[i-2]
writeln(`So hang thu`, N,` la: `,F[N]:5:2);
End.
?
ÔN TẬP
Về nhà làm bài tập
Biết nhập và khai báo kiểu dữ liệu cho các bài toán 6b, 7, 8,9,10,11
Viết ý tưởng để giải các bài toán trên.
?