Câu hỏi của Trọng khương

Question

Cho mảng A gồm 10 phần tử thuộc kiểu nguyên. Viết hàm đếm số lượng số nguyên chia hết cho 7 của mảng A.
Mọi người giúp mình với ạ

Nguyễn Lê Phước Thịnh · Accepted Answer

type mang=array[1..10]of integer;function demsochiahet(a:mang):integer;var dem,i,n:integer;begindem:=0;for i:=1 to n do   if a[i] mod 7=0 then inc(dem);demsochiahet:=dem;end;Câu trả lời: type mang=array[1..10]of integer;function demsochiahet(a:mang):integer;var dem,i,n:integer;begindem:=0;for i:=1 to n do   if a[i] mod 7=0 then inc(dem);demsochiahet:=dem;end;

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP