Trang chủ Tin Học Lớp 12 Nhập dãy số n phần tử và tính tổng cách...

Nhập dãy số n phần tử và tính tổng cách phân tử đó. P/s: mình cần một cách làm khác cách cơ bản nha (càng nhiều càng tốt) - câu hỏi 1922069

Câu hỏi :

Nhập dãy số n phần tử và tính tổng cách phân tử đó. P/s: mình cần một cách làm khác cách cơ bản nha (càng nhiều càng tốt)

Lời giải 1 :

program bai_giai;

uses crt;

var A:array[1..10000] of integer;

      n,i,t:integer;

begin

      clrscr;

      write('Nhap n: ');   readln(n);

      for i:=1 to n do

            begin

                  write('Nhap so thu ',i,': ');  readln(A[i]);

            end;

      t:=0;

      for i:=1 to n do t:=t+A[i];

      write('Tong cac phan tu la: ',t);

      readln;

end.

Thảo luận

-- vòng lặp for dùng để nhập mảng vòng lặp thứ hai dùng để tính tổng
-- cho mik hỏi là liệu còn cách khác để tính tổng ko ạ
-- còn làm gộp trong phần nhập hoặc là dùng chương trình con

Lời giải 2 :

uses crt;
var a:array[1..100] of integer; n,i,s:integer;
begin
      clrscr;
      write('Nhap so luong phan tu: '); readln(n);
      s:=0;
      for i:=1 to n do
            begin
                  write('Nhap phan tu thu ',i,': '); readln(a[i]);
            end;
      for i:=1 to n do s:=s+a[i];
      write('Tong: ',s);
      readln;
end.

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 12

Lớp 12 - Năm cuối ở cấp tiểu học, năm học quan trọng nhất trong đời học sinh trải qua bao năm học tập, bao nhiêu kì vọng của người thân xung quanh ta. Những nỗi lo về thi đại học và định hướng tương lai thật là nặng. Hãy tin vào bản thân là mình sẽ làm được rồi tương lai mới chờ đợi các em!

Nguồn : ADMIN :))

Liên hệ hợp tác hoặc quảng cáo: gmail

Điều khoản dịch vụ

Copyright © 2021 HOCTAPSGK