Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
foxbi

Viết chương trình bằng ngôn ngữ lập trình Pascal để nhập vào N số nguyên từ bàn phím, tính tổng của các số vừa nhập và in ra màn hình giá trị tổng.

 

HT.Phong (9A5)
18 tháng 3 2023 lúc 7:00

Uses crt;

var n,i,x,u: integer;

begin clrscr;

readln(n);

for i:=1 to n do begin

readln(x);

u:=u+x;

end;

writeln(u);

readln;

end.

Trần Đức Hải Phong
25 tháng 12 2023 lúc 16:54

program TongCacSoNguyen;

var
  N, i, soNguyen, tong: integer;

begin
  // Nhập số lượng N
  write('Nhap so luong N: ');
  readln(N);

  // Khởi tạo tổng
  tong := 0;

  // Nhập và tính tổng các số nguyên
  for i := 1 to N do
  begin
    write('Nhap so nguyen thu ', i, ': ');
    readln(soNguyen);
    tong := tong + soNguyen;
  end;

  // In ra màn hình tổng
  writeln('Tong cua cac so nguyen la: ', tong);

  readln;
end.


Các câu hỏi tương tự
Nguyễn Kim Trí
Xem chi tiết
PC Vũ
Xem chi tiết
Trúc Linh
Xem chi tiết
foxbi
Xem chi tiết
KenShi
Xem chi tiết
minh đức
Xem chi tiết
Đoàn Khánh Chi
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết