Giải giùm bài pascal này với.

[vietbac26391]

Viết chương trình tính tổng dãy sổ in ra màn hình dãy số vừa nhập

Copyright © ..:: DIỄN ĐÀN HS TRƯỜNG THPT NINH CHÂU ::.. - Posted by Bluesky10696​

[daocba]

Sẹc... bluesky :-o
Hàizzz
Bạn dùng mảng tính thui, mấy bài này dễ mà [IMG]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAAEAAAABAQMAAAA l21bKAAAAA1BMVEXh5PJm+yKVAAAAAXRSTlMAQObYZgAAAApJR EFUCNdjYAAAAAIAAeIhvDMAAAAASUVORK5CYII=[/IMG]

[daolv91]

program tinhtong;
uses crt;
var i,n,sum:integer;
    a:array[1..100] of integer;
begin
  clrscr;
  sum:=0;
  write('Nhap so phan tu: ');readln(n);
  for i:=1 to n do
    begin
      write('Nhap phan tu thu [',i,']= ');
      readln(a[i]);
      sum:=sum+a[i];
    end;
  writeln('Day so vua nhap la:');
  for i:=1 to n do
    write(' ',a[i]);
  writeln;
  writeln('Tong cua day so tren la: ',sum);
  readln;
end.

Chúc vui ^_*

[namsgu3979]

Sẹc... bluesky :-o
Hàizzz
Bạn dùng mảng tính thui, mấy bài này dễ mà [IMG]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAAEAAAABAQMAAAA l21bKAAAAA1BMVEXh5PJm+yKVAAAAAXRSTlMAQObYZgAAAApJR EFUCNdjYAAAAAIAAeIhvDMAAAAASUVORK5CYII=[/IMG]

Không biết thì bạn ấy mới hỏi. Bạn giúp đc thì tốt. Nếu không thì cũng đừng có nói như vậy!

[thanhcanh]

program tinhtong;
uses crt;
var i,n,sum:integer;
    a:array[1..100] of integer;
begin
  clrscr;
  sum:=0;
  write('Nhap so phan tu: ');readln(n);
  for i:=1 to n do
    begin
      write('Nhap phan tu thu [',i,']= ');
      readln(a[i]);
      sum:=sum+a[i];
    end;
  writeln('Day so vua nhap la:');
  for i:=1 to n do
    write(' ',a[i]);
  writeln;
  writeln('Tong cua day so tren la: ',sum);
  readln;
end.

Chúc vui ^_*

Cảm ơn bạn, thanks bạn nhìu. Y!M của bạn là gì vậy, làm quen nhé.

[nuochoaparis]

Sẹc... bluesky :-o
Hàizzz
Bạn dùng mảng tính thui, mấy bài này dễ mà [IMG]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAAEAAAABAQMAAAA l21bKAAAAA1BMVEXh5PJm+yKVAAAAAXRSTlMAQObYZgAAAApJR EFUCNdjYAAAAAIAAeIhvDMAAAAASUVORK5CYII=[/IMG]

Lần sau bạn đừng nói thế nhé, bạn ý mới học nên coi bài này khó, bạn học rồi nên coi là dễ. Nói như thế có đôi phần xúc phạm đó.