Nhập vào số nguyên dương N và dãy gồm N số nguyên. 1. Hiển thị dãy vừa nhập lên màn hình. 2. tính tổng giá trị các phần tử của mảng. 3. Ghi kết quả vào tệp mảng TOC Giúp mk.. Huhu

1 câu trả lời

program Tin_hoc;

uses crt;

var i,n,tong:integer;

      a : array[1..10000] of integer

begin

clrscr;

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

tong:=0;

writeln('Nhap ',n,' phan tu:');

for i:= 1 to n do

begin

readln(a[i]);

tong:=tong+a[i]

end;

writeln('Day vua nhap:');

for i:= 1 to n do write(a[i],'   ');

writeln;

writeln('Tong cac gia tri cua mang la: ',tong);

readln;

end.

XIN LỖI EM CHỈ BIẾT LÀM CÂU 1 VÀ 2 THÔI

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