bai 1 :Viết chương trình thực hiệncasc công việc sau:
a)nhập mảng A gồm n phần tử và mỗi phần tử là một số nguyên
b) ghi mảng A vào tệp D:\dulieu.inp với cấu trúc sau:
Dòng thứ nhất:n
Dòng thứ hai : các số nguyên, mỗi số cách nhau một dấu cách
Bài 2: viết chương trình thực hiện các công việc sau
a) đọc dữ liệu từ tệp D:\dulieu.inp(ở câu 1) rồi tính tổng các số nguyên âm , tổng các số nguyên dương
b) in tổng các số nguyên âm, nguyên dương ra màn hình
(Mọi người giúp mình với mai mình thi rồi cảm ơn nhiều ạ)
1,
a, var A: array[1..500] of integer;
i,n:integer;
begin
write(' n la ');readln(n);
for i:=1 to n do
begin
write('a',i,'la'); readln(a[i]);
end;
readln
end.
