Câu hỏi:

19/08/2025 550 Lưu

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.

Quảng cáo

Trả lời:

verified 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.

CÂU HỎI HOT CÙNG CHỦ ĐỀ

Câu 1

A. Đọc dữ liệu
B. Xem, bổ sung, sửa, xóa và không truy cập dữ liệu
C. Thêm dữ liệu
D. Xem, sửa, bổ sung và xóa dữ liệu

Lời giải

Lời giải:

Đáp án đúng: D

Xem, sửa, bổ sung và xóa dữ liệu

Câu 2

A. Microsoft Access
B. Oracle
C. Microsoft SQL server
D. Microsoft Excel

Lời giải

Lời giải:

Đáp án D.

Microsoft Excel không phải là hệ quản trị cơ sở dữ liệu quan hệ.

Câu 3

A. Có thể lưu lại cấu trúc và nhập dữ liệu sau
B. Không thể sửa lại cấu trúc
C. Tạo mẫu hỏi ngay
D. Phải nhập dữ liệu ngay

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP

Câu 4

A. Khoá chính = {Mahs}
B. Khoá chính = {HoTen, Ngaysinh, Lop, Diachi, Toan}
C. Khoá chính = {HoTen, Ngaysinh, Lop, Diachi, Li}
D. Khoá chính = {HoTen, Ngaysinh, Lop, Diachi}

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP

Câu 5

A. Một bảng có thể có nhiều khoá chính
B. Mỗi bảng có ít nhất một khoá
C. Xác định khoá phụ thuộc vào quan hệ logic của các dữ liệu chứ không phụ thuộc vào giá trị các dữ liệu
D. Nên chọn khoá chính là khoá có ít thuộc tính nhất

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP

Câu 6

A. Chỉ quan tâm bảo mật dữ liệu
B. Chỉ quan tâm bảo mật chương trình xử lí dữ liệu
C. Quan tâm bảo mật cả dữ liệu và chương trình xử lí dữ liệu
D. Chỉ là các giải pháp kĩ thuật phần mềm

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP

Câu 7

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP