tính tổng các số từ 1 đến n không dùng for, while, repeat;
2 câu trả lời
program bai_giai;
uses crt;
var n:longint;
begin
clrscr;
write('nhap n:');readln(n);
write('tong cac so tu 1 den n la:',(n+1)*n/2);
readln
end.
uses crt;
var n:longint;
begin
clrscr;
write('Nhap n: ');readln(n);
write('Tong cac so tu 1 den n: ',n*(n+1) div 2);
readln
end.
Câu hỏi trong lớp
Xem thêm