Câu hỏi:
28/06/2023 141
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 !!
Quảng cáo
Trả lời:
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.
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
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Lời giải
Lời giải:
Đáp án đúng: D
Xem, sửa, bổ sung và xóa dữ liệu
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ệ.
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.
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.
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.
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.
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.