Câu hỏi:
28/06/2023 90
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 !!
Sách mới 2k7: Tổng ôn Toán, Lí, Hóa, Văn, Sử, Địa…. kỳ thi tốt nghiệp THPT Quốc gia 2025, đánh giá năng lực (chỉ từ 110k).
Quả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:
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
41,241
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
17,584
Câu 6:
Sau khi tạo liên kết giữa các bảng trong mô hình dữ liệu quan hệ, có thể thực hiện công việc nào dưới đây?
Xem đáp án »
28/06/2023
13,766
Bình luận
🔥 Đề thi HOT:
-
263 câu Trắc nghiệm tổng hợp ôn thi tốt nghiệp THPT môn Tin học Chủ đề F. Giải quyết vấn đề với sự trợ giúp của máy tính có đáp án
-
15 câu Trắc nghiệm Tin học 12 KNTT Bài 7: HTML và cấu trúc trang web
-
Đề thi học kì 1 Tin học 12 Kết nối tri thức có đáp án- Đề 1
-
15 câu Trắc nghiệm Tin học 12 KNTT Bài 10: Tạo liên kết
-
15 câu Trắc nghiệm Tin học 12 KNTT Bài 11: Chèn tệp tin đa phương tiện và khung nội tuyến vào trang web
-
15 câu Trắc nghiệm Tin học 12 KNTT Bài 9: Tạo danh sách, bảng
-
15 câu Trắc nghiệm Tin học 12 KNTT Bài 8: Định dạng văn bản
-
15 câu Trắc nghiệm Tin học 12 Cánh diều Bài 1: Làm quen với ngôn ngữ đánh dấu siêu văn bản
về câu hỏi!