Bài 17: Chương trình con và phân loại

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Thanh Hoàn

1) viết chương trình có sử dụng chương trình con để thực hiện yêu cầu sau:

a) thủ tục nhập vào số nguyên N phần tử (N<=100)

b) hàm tính tổng các số chẵn

c) gọi chương trình con để thực hiện và in kết quả tính tổng các số chẵn ra màn hình

Minh Lệ
12 tháng 6 2020 lúc 11:50

Program HOC24;

var i,n: integer;

t: longint;

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

procedure ip;

begin

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

for i:=1 to n do

begin

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

end;

end;

function chan(x: integer): longint;

var tong: longint;

begin

t:=0;

if x mod 2=0 then tong:=x;

chan:=tong;

end;

begin

ip;

for i:=1 to n do t:=t+chan(a[i]);

write(t);

readln

end.


Các câu hỏi tương tự
Đặng Thị Kiều Oanh
Xem chi tiết
Thúy Hà
Xem chi tiết
Trong nhóm zalo
Xem chi tiết
Tuấn Lê
Xem chi tiết
hà nội 123
Xem chi tiết
Tuấn Lê
Xem chi tiết
Thúy Hà
Xem chi tiết
Đạt Trần
Xem chi tiết
Thanh Hải
Xem chi tiết