Tin học Viết thuật toán tin học

[Mon Suke]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Đề: cho dãy n sô nguyên a1,a2,....an
Tính tổng phần tử của dãy

 

[ka1412]

uses crt;
var n,i,j,s:integer;
begin
clrscr;
write('Nhap n:');readln(n);
for i:=1 to n do
begin
readln(j);
s:=s+j;
end;
write('Tong:',s);

không hiểu gì cứ hỏi mình nhé =)))

 

[Mon Suke]

Bạn viết cái gì mình không hiểu... Nhưng mình biêt cách giải rồi, cảm ơn bạn nhé