Lời giải:
program bai1;
user crt;
var n,s,i:longint;
begin
write('n= ');
readln(n);
s:=0;
for i:=1 to 10 do s:=s+i;
write('Tong cua 10 so tu nhien dau tien la',s);
readln;
end.
Gói VIP thi online tại VietJack (chỉ 400k/1 năm học), luyện tập gần 1 triệu câu hỏi có đáp án chi tiết