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
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?
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.