Bài 11: Kiểu mảng

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Quân Nguyễn

Nhập mảng một chiều gồm m số nguyên ( 0<m<50). Viết chương trình
thực hiện các công việc sau:
a. Nhập mảng từ bàn phím.
b. Hiển thị mảng ra màn hình.
c. Tổng các phần tử
d. Tìm và in số nhỏ nhất cùng số lần xuất hiện của nó trong dãy

huhu mng giúp mình với ạ, dùng #include<stdio.h> mng nhé huhu gấp lắm ạ ngày kia thi rùi

Nguyễn Lê Phước Thịnh
26 tháng 6 2021 lúc 19:18

uses crt;

var a:array[1..50]of integer;

m,n,t,min,vt:integer;

begin

clrscr;

write('Nhap m='); readln(m);

for i:=1 to m do 

  begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to m do 

  write(a[i]:4);

writeln;

t:=0;

for i:=1 to m do 

  t:=t+a[i];

writeln('Tong cac phan tu la: ',t);

min:=a[1];

for i:=1 to n do 

  if min>a[i] then min:=a[i];

vt:=0;

for i:=1 to n do 

 if min=a[i] then inc(vt);

writeln('So nho nhat la: ',min);

writeln('So lan xuat hien la: ',vt);

readln;

end.


Các câu hỏi tương tự
Vương Thị Minh Tâm
Xem chi tiết
Khanh Linh
Xem chi tiết
Ngoc Huyen
Xem chi tiết
Ken Kaneki
Xem chi tiết
Benny
Xem chi tiết
Linh Tran
Xem chi tiết
Toản Nguyễn
Xem chi tiết
Nguyen Loi
Xem chi tiết
Bui Trong Diep
Xem chi tiết