Câu hỏi:

08/07/2020 237

Viết chương trình:
- Nhập mảng một chiều các số nguyên (không quá 100 phần tử).
- Đếm và tính tổng các số chẵn và là bội của 5. Thông báo kết quả ra màn hình.

Xem lời giải

Câu hỏi trong đề: Top 4 Đề thi Tin học 11 Học kì 1 có đáp án !!

Trả lời:

Giải bởi Vietjack

Program bt_3;

Uses crt;

Var a: array[1..100] of integer;

Dem, Tong, n, i: integer;

Begin

Clrscr;

Writeln(‘nhap so phan tu, n=’);

Readln (n);

for i := 1 to n do

begin

writeln(‘nhap gia trij phan tu thu ’,i,’ =’);

readln(a[i]);

end;

Dem:=0;

Tong:=0;

For i:=1 to n do

If (a[i] mod 2 = 0) and (a[i] mod 5 = 0) then

begin

Dem:= Dem+1;

Tong:= Tong+a[i];

end;

writeln(‘Dem la:’,Dem);

Writeln(‘Tong la:’,Tong);

Readln

End.

Bình luận hoặc Báo cáo
về câu hỏi!

Câu 1:

Với lệnh nào sau đây dùng để in giá trị M là kiểu số thực ra màn hình với độ rộng là 5 và có 2 chữ số phần thập phân?

A. Writeln(M:2);

B. Write(M:5);

C. Writeln(M:2:5);

D. Write(M:5:2);

Xem đáp án » 08/07/2020 40,371

Câu 2:

Biểu thức ((35 mod 9) div 2) có kết quả là mấy?

A. 1

B. 3

C. 4

D. 2

Xem đáp án » 08/07/2020 26,564

Câu 3:

Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

A. b + c > a

B. c - a > b

C. b – a ≥ c

D. b - c > a

Xem đáp án » 08/07/2020 22,131

Câu 4:

Để thoát khỏi phần mềm, trong Pascal ta nhấn tổ hợp phím:

A. Ctrl + F9

B. Alt + F9

C. Alt + F3

D. Alt + X

Xem đáp án » 08/07/2020 18,783

Câu 5:

Trong NN lập trình Pascal, biểu thức số học nào sau đây là không hợp lệ:

A. 5*a + 7*b + 8*c

B. 3*a -2*b +8*c

C. x*y*(x +y)

D. {a + b}*c

Xem đáp án » 08/07/2020 14,803

Câu 6:

Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0). Với giá trị nào của m dưới đây biểu thức trên cho giá trị true?

A. 65

B. 208

C. 99

D. 113

Xem đáp án » 08/07/2020 12,026

Câu 7:

Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình:
i:=1;
While i < 5 do
Begin
if I mod 2 = 1 then Write(‘TIN HOC’);
i:=i+1;
End;
Chữ TIN HOC được in ra màn hình mấy lần

A. 3

B. 2

C. 1

D. 0

Xem đáp án » 08/07/2020 10,095

Xem thêm các câu hỏi khác »

Viết chương trình:
- Nhập mảng một chiều các số nguyên (không quá 100 phần tử).
- Đếm và tính tổng các số chẵn và là bội của 5. Thông báo kết quả ra màn hình.

Nhà sách VIETJACK:

Với lệnh nào sau đây dùng để in giá trị M là kiểu số thực ra màn hình với độ rộng là 5 và có 2 chữ số phần thập phân?

Biểu thức ((35 mod 9) div 2) có kết quả là mấy?

Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

Để thoát khỏi phần mềm, trong Pascal ta nhấn tổ hợp phím:

Trong NN lập trình Pascal, biểu thức số học nào sau đây là không hợp lệ:

Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0). Với giá trị nào của m dưới đây biểu thức trên cho giá trị true?

Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình:
i:=1;
While i < 5 do
Begin
if I mod 2 = 1 then Write(‘TIN HOC’);
i:=i+1;
End;
Chữ TIN HOC được in ra màn hình mấy lần

Bình luận

🔥 Đề thi HOT:

VIP +3 tháng ( 199,000 VNĐ )

VIP +6 tháng ( 299,000 VNĐ )

VIP +12 tháng ( 499,000 VNĐ )

Viết chương trình:- Nhập mảng một chiều các số nguyên (không quá 100 phần tử).- Đếm và tính tổng các số chẵn và là bội của 5. Thông báo kết quả ra màn hình.

Nhà sách VIETJACK:

Với lệnh nào sau đây dùng để in giá trị M là kiểu số thực ra màn hình với độ rộng là 5 và có 2 chữ số phần thập phân?

Biểu thức ((35 mod 9) div 2) có kết quả là mấy?

Biết rằng a, b, c là độ dài ba cạnh của một tam giác, biểu thức quan hệ nào sau đây cho kết quả true?

Để thoát khỏi phần mềm, trong Pascal ta nhấn tổ hợp phím:

Trong NN lập trình Pascal, biểu thức số học nào sau đây là không hợp lệ:

Xét biểu thức logic: (m mod 100 < 10) and (m div 100 > 0). Với giá trị nào của m dưới đây biểu thức trên cho giá trị true?

Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình:i:=1;While i < 5 do Beginif I mod 2 = 1 then Write(‘TIN HOC’);i:=i+1; End;Chữ TIN HOC được in ra màn hình mấy lần

Bình luận

🔥 Đề thi HOT:

VIP +3 tháng ( 199,000 VNĐ )

VIP +6 tháng ( 299,000 VNĐ )

VIP +12 tháng ( 499,000 VNĐ )

CHỌN BỘ SÁCH BẠN MUỐN XEM

Đăng ký

Đăng nhập

Quên mật khẩu

Viết chương trình:
- Nhập mảng một chiều các số nguyên (không quá 100 phần tử).
- Đếm và tính tổng các số chẵn và là bội của 5. Thông báo kết quả ra màn hình.

Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình:
i:=1;
While i < 5 do
Begin
if I mod 2 = 1 then Write(‘TIN HOC’);
i:=i+1;
End;
Chữ TIN HOC được in ra màn hình mấy lần