Question

Cho tệp SONGUYEN.TXT chứa cac số nguyên dương N. Viết ct in ra các số chẵn nhỏ hơn hoặc bằng N; Tính tổng các số chẵn đó. Kết quả ghi vào tệp SOCHAN.TXT a) XĐ input, output bài toán b) Viết ct giải quyết bài toán trên Mô tả - Tệp SONGUYEN.TXT chứa các số nguyên dương N - Tệp SOCHAN.TXT dòng ban đầu chứa các số chẵn nhỏ hơn hoặc bằng N - Dòng 2 chứa tổng số chẵn AI GIÚP EM VỚI Ạ Cứuuuuu e

Answer 1

mình cũng cần ạ

Answer 2

a)

Input: Số nguyên dương N, dãy số a1,a2,a3,...,an

Output: Tổng các số chẵn nhỏ hơn hoặc bằng N

b)

Program HOC24;

var i,n: integer;

t: longint;

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

f1,f2: text;

const fi='SONGUYEN.TXT'

fo='SOCHAN.TXT'

begin

assign(f1,fi);

assign(f2,fo);

reset(f1);

rewrite(f2);

readln(f1,n);

for i:=1 to n do read(f1,a[i]);

for i:=1 to n do if (a[i] mod 2=0) and (a[i]<=n) then

begin

write(f2,a[i],' ');

t:=t+a[i];

end;

writeln(f2);

write(f2,t);

close(f1); close(f2);

end.