Câu hỏi:
13/07/2024 490
Cho mảng A gồm N phần tử thuộc kiểu nguyên dương (N≤500)? Viết chương trình thực hiện tính tổng các số chia hết cho 3 hoặc cho 5, phải viết và sử dụng các chương trình con sau trong chương trình:
a) Thủ tục nhập giá trị cho mảng A từ bàn phím.
b) Hàm kiểm tra số chia hết cho 3 hoặc 5.
Cho mảng A gồm N phần tử thuộc kiểu nguyên dương (N≤500)? Viết chương trình thực hiện tính tổng các số chia hết cho 3 hoặc cho 5, phải viết và sử dụng các chương trình con sau trong chương trình:
a) Thủ tục nhập giá trị cho mảng A từ bàn phím.
b) Hàm kiểm tra số chia hết cho 3 hoặc 5.
Câu hỏi trong đề: Trắc nghiệm tổng hợp Tin học năm 2023 có đáp án !!
Bắt đầu thiQuảng cáo
Trả lời:
Giải bởi Vietjack
Lời giải:
uses crt;
var n:integer;
a:array[1..500] of longint;
s:longint;
function check(x:longint):boolean;
begin
if (x mod 3=0) or (x mod 5=0) then exit(true);
exit(false);
end;
procedure nhap;
var i:integer;
begin
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do
begin
write('Nhap phan tu thu ',i,' : ');
readln(a[i]);
end;
writeln;
end;
procedure xuli;
var i:integer;
begin
for i:=1 to n do
if check(a[i]) then s:=s+a[i];
end;
procedure xuat;
begin
write('Tong cac so chia het cho 3 hoac 5 la: ',s);
readln;
end;
begin
nhap;
xuli;
xuat;
end.
Nhà sách vietjack
Hot: 500+ Đề thi thử tốt nghiệp THPT các môn, ĐGNL các trường ĐH... file word có đáp án (2025). Tải ngay
Bình luận
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Câu 2:
Phần mềm nào sau đây không phải là hệ quản trị cơ sở dữ liệu quan hệ
Xem đáp án »
28/06/2023
44,397
Câu 4:
Trong bảng sau đây, mỗi học sinh chỉ có mộ mã số (Mahs):
Khoá chính của bảng là:
Trong bảng sau đây, mỗi học sinh chỉ có mộ mã số (Mahs):
Khoá chính của bảng là:
Xem đáp án »
27/06/2023
19,316
Câu 6:
Phát biểu nào sai trong các phát biểu sau khi nói về khoá chính?
Xem đáp án »
27/06/2023
17,562
🔥 Đề thi HOT:
-
15 câu Trắc nghiệm Tin học 12 Kết nối tri thức Bài 19 có đáp án
-
15 câu Trắc nghiệm Tin học 12 Kết nối tri thức Bài 18 có đáp án
-
15 câu Trắc nghiệm Tin học 12 Cánh diều Giới thiệu trí tuệ nhân tạo có đáp án
-
15 câu Trắc nghiệm Tin học 12 Kết nối tri thức Bài 23 có đáp án
-
15 câu Trắc nghiệm Tin học 12 Kết nối tri thức Bài 20 có đáp án
-
15 câu Trắc nghiệm Tin học 12 Kết nối tri thức Bài 21 có đáp án
-
15 câu Trắc nghiệm Tin học 12 Kết nối tri thức Bài 22 có đáp án
-
15 câu Trắc nghiệm Tin học 12 Kết nối tri thức Bài 16 có đáp án
Hãy Đăng nhập hoặc Tạo tài khoản để gửi bình luận
-
-
Bình luận