Cho tệp có tên là Info.txt. chứa giá trị của một dãy số nguyên có tối đa là 50 phần tử. Tính: - Tổng của các phần tử là số chẵn trong dãy. - Tìm giá trị lớn nhất của dãy - In ra các phần tử trong dãy mà là bội của k ( k là 1 số nguyên) - In tất cả kết quả ra tệp Outfo.TXT

1 câu trả lời

Người hay giúp bạn khác trả lời bài tập sẽ trở thành học sinh giỏi. Người hay hỏi bài thì không. Còn bạn thì sao?

  • Mới nhất
  • Chưa trả lời
  • Câu hỏi hay
  • Câu hỏi của tôi

Han Pham thi ngoc4 phút trước

Viết chương trình

a) nhập từ bàn phím các số nguyên cho mảng a gồm 10 phần tử

b) điểm trong mảng a có bao nhiêu số chia hết cho 5

0 câu trả lờiTin học lớp 11 Kiểu dữ liệu có cấu trúcBài 11: Kiểu mảngnguyen thi khanh nguyen11 giờ trước (21:14)

Viết chương trình đếm số lượng phần tử chẵn trong mảng 1 chiều

1 câu trả lờiTin học lớp 11 Kiểu dữ liệu có cấu trúcBài 11: Kiểu mảngNguyễn Lê Phước Thịnh11 giờ trước (21:58)

uses crt;

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

i,n,dem:integer;

begin

clrscr;

write('n='); readln(n);

for i:=1 to n do

begin

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

end;

{-------------------------------------------------------------}

dem:=0;

for i:=1 to n do

if a[i] mod 2=0 then inc(dem);

writeln('so phan tu chan trong day la: ',dem);

readln;

end.

Câu hỏi trong lớp Xem thêm