Hãy viết chương trình sử dụng lệnh lặp WHILE - DO để tính tổng các số tự nhiên từ 1 đến 10
Bài Làm:
Uses crt;
Var S, i: integer;
Begin
clrscr;
S : = 0;
i := 1;
while i <= 10 do
begin
S := S + i;
i := i + 1;
end;
writeln (S);
readln;
end.
Để học tốt Vnen tin học 8, loạt bài giải bài tập Vnen tin học 8 đầy đủ kiến thức, lý thuyết và bài tập được biên soạn bám sát theo nội dung sách giáo khoa Lớp 8.
Giải bài tập SGK, SBT, VBT và Trắc nghiệm các môn học Lớp 8, dưới đây là mục lục các bài giải bài tập sách giáo khoa và Đề thi chi tiết với câu hỏi bài tập, đề kiểm tra 15 phút, 45 phút (1 tiết), đề thi học kì 1 và 2 (đề kiểm tra học kì 1 và 2) các môn trong chương trình Lớp 8 giúp bạn học tốt hơn.