: 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 đưa ra những thông tin sau:
- Số lượng số chẵn và số lượng số lẻ
- số lượng số nguyên tố trong dãy
Xem lời giải
- Duyệt toàn bộ mảng ,nếu số nào chia hết cho 2 thì là số chẵn còn lại là số lẻ. Ta dùng một biến để đếm số chẵn . Sau đó lấy số phần tử trừ đi số phần tử chẵn.
program csc; uses crt; var a:array[1..100] of integer;
i,d,n:integer;
- Số lượng số nguyên tố trong dãy
Duyệt toàn bộ các số trong dãy với mỗi số ta kiểm tra xem số này có chia hết số nào từ 2 đến a[i]-1 của nó không ?. Nếu không thì kết luận là số nguyên tố.
program csc; uses crt; var a:array[1..100] of integer;
i,d,n,j:integer;
t:boolean;
t:=true;
for j:=2 to a[i]-1 do
begin
if [a[i] mod j=0] and [a[i]2]
then
begin
t:=false;
break;
end;
end;
if t=true
then
d:=d+1;
Kết quả:
Câu trả lời này có hữu ích không?
Gói VIP thi online tại VietJack [chỉ 200k/1 năm học], luyện tập gần 1 triệu câu hỏi có đáp án chi tiết
ĐĂNG KÝ VIP
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Câu 1:
Bài 4 [trang 79 sgk Tin học lớp 11]: Tham chiếu đến phần tử của mảng bằng cách nào?
Câu 2:
Bài 10 [trang 80 sgk Tin học lớp 11]: Viết chương trình nhập từ bàn phím xâu kí tự S có độ dài không quá 100. Hãy cho biết có bao nhiêu chữ số xuất hiện trong xâu S. Thông báo kết quả ra màn hình.
Câu 3:
Bài 5 [trang 79 sgk Tin học lớp 11]: 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...AN có giá trị tuyệt đối lớn hơn 1000. Hãy cho biết dãy A có phải là một cấp số cộng hay không và thông báo kết quả ra màn hình.
Câu 4:
Bài 1 [trang 79 sgk Tin học lớp 11]: Tại sao mảng là kiểu dữ liệu có cấu trúc?
Câu 5:
Bài 7 [trang 79 sgk Tin học lớp 11]: ]: Dãy F là dãy Phi-bo-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-bo-na-xi. Chương trình của bạn thực hiện với giá trị lớn nhất của N là bao nhiêu?
Câu 6:
Bài 3 [trang 79 sgk Tin học lớp 11]: Các phần tử của mảng có thể có những kiểu gì?
Câu 7:
Bài 2 [trang 79 sgk Tin học lớp 11]: Tại sao phải khai báo kích thước của mảng?
Câu 8:
Bài 8 [trang 79 sgk Tin học lớp 11]: Chương trình sau thực hiện những gì?
Chương trình sau đây thực hiện những gì?
program BT8; const NMax = 50; type Mass = array [1...NMax, O..NMax-1] of real; var A: Mass; i,j N: byte; C: real; begin Write ['Nhap N= ?']; readln[N]; for i:= 1 to N do for 0 to N-1 do begin write['A[i,j; readln[A[i,j ] ] end, for i:= 1 to N do for j:= 1 to N-1 do begin C:= A[i,j]; A[i , j ] := A[N-i+1, j ] A [N-i+1,j] := C; end; for i:=1 to N do begin for j : =1 to N— 1 do write [A [ i, j ] : 5 : 2 , ' ']; writeln end; End.
Câu 9:
Bài 11 [trang 80 sgk Tin học lớp 11]: Hãy bổ sung thêm vào chương trình Xep_loai ở bài 13 những lệnh cần thiết để chương trình đưa ra danh sách học sinh xếp loại A.
Câu 10:
Bài 9 [trang 80 sgk Tin học lớp 11]: Cho mảng hai chiều kích thước nxm với các phần tử là những số nguyên. Tìm trong mỗi dòng phần tử lớn nhất rồi đổi chỗ nó với phần tử có chỉ số dòng bằng chỉ số cột.