Câu hỏi:
28/06/2023 123
Cho mảng T gồm 20 phần tử thuộc kiểu nguyên. Viết chương trình thực hiện các yêu cầu sau:
a. Viết thủ tục nhập giá trị cho mảng T từ bàn phím
b. Viết hàm tính giá trị trung bình của các phần từ vừa nhập
c. Viết hàm tính tổng các số chia hết cho X (X nhập từ bàn phím)
a. Viết thủ tục nhập giá trị cho mảng T từ bàn phím
b. Viết hàm tính giá trị trung bình của các phần từ vừa nhập
c. Viết hàm tính tổng các số chia hết cho X (X nhập từ bàn phím)
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:
Chương trình đề xuất
Program kiemtrahk2;
type mang=array[1..20] of integer;
var n,i,x:integer; T:mang;
a.
procedure nhap(var T:mang; n:integer);
begin
for i:= 1 to n do
begin
write('T[',i,']=');
readln(T[i]);
end;
end;
b.
function trungbinh(var a:mang; n:integer):real;
var tb:real; stb:integer;
begin
stb:=0;
for i:= 1 to n do
stb:=stb+T[i];
tb:=stb/n;
trungbinh:=tb;
end;
c.
function tongchia(var T:mang;var x:integer; n:integer):real;
var schia:real;
begin
schia:=0;
for i:= 1 to n do
if T[i] mod x=0 then schia:=schia+T[i];
tongchia:=schia;
end;
begin
nhap(T,20);
xuat(T,20); writeln;
write( ‘Trung binh la:’,trungbinh(T,20):6:4); writeln;
write( ‘nhap so nguyen x= ’); readln(x);
write( ‘ Tong cac so chia het cho’,x,’
la:’,tongchia(T,x,20):6:2);readln
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