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
E. Hoạt động tìm tòi mở rộng
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.
Xem thêm bài viết khác
- Em hãy tạo một chương trình để mèo vẽ một hình chữ nhật màu xanh và chuột chạy lung tung...
- So sánh với quy định cú pháp thì trong chương trình này đâu là điều kiện, đâu là câu lệnh?...
- Dưới đây là kịch bản của bạn Hồng tạo ra hoạt cảnh nhân vật múa. Các em có thể giúp bạn Hồng chuyển kịch bản...
- Giải vnen tin 8 bài 1: Làm quen với Scratch
- Hãy xác định Input và Output của bài toán sau đây...
- Hãy viết chương trình sử dụng lệnh lặp FOR để tính tổng các số tự nhiên từ 1 đến 10
- Khi thực hiện chương trình, nếu người sử dụng nhập giá trị 18 cho biến b và nhập kí tự 'k'...
- Xét bài toán dưới đây. Thuật toán của mỗi bài đều được mô tả theo hai cách. Em hãy tìm...
- Em hãy đọc nội dung dưới đây để biết một số từ khóa trong Pascal và chỉ ra các từ khóa...
- Hãy sửa lại chương trình để nó điều khiển quả bóng chuyển động liên tục qua 4 vị trí A, B, C, D một số lần nào đó
- Hãy sắp xếp các biểu tượng công cụ sau đây theo các nhóm...
- Quá trình tạo và thực hiện chương trình Scratch có trải qua hai bước như trên không?...