K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

GL
9 tháng 4 2023

uses crt;

var s,i:integer;

begin

s:=0;

for i:=1 to 100 do s:=s+i;

write('Tong cac so tu 1 den 100 la: ',S);

readln;

end.

7 tháng 4 2023

A