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
D. Hoạt động vận dụng
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
Bài làm:
Uses crt;
Var S, i: integer;
Begin
clrscr;
S : = 0;
for i:=1 to 10 do S := S + i;
writeln (S);
readln;
end.
Xem thêm bài viết khác
- Hãy mô tả chương trình vẽ một hình tam giác bằng nhân vật bút chì (vẽ bằng đầu bút chì)
- Em hãy cho biết trong hai đoạn chương trình sau, lệnh nào sai và sai chỗ nào?
- Hãy xác định Input và Output của bài toán sau đây...
- Theo cấu trúc chương trình Pascal ở trên, em phát hiện được những lỗi nào trong chương trình dưới đây
- Hãy thay lệnh set pen color to bằng lệnh change pen color by và thực hiện chương trình vài lần rồi rút ra nhận xét.
- Để tìm hai số lớn hơn trong hai số a và b sau đó gán cho biến c...
- Với mỗi câu lệnh sau đây giá trị của biến x sẽ là bao nhiêu, nếu trước đó giá trị của x bằng 5?
- Thực hiện các công việc sau đây: a, Ẩn nhân vật chú mèo và Catherine sau đó chọn trong thư viện...
- Theo quy ước đặt tên của ngôn ngữ lập trình pascal, em hãy chỉ ra tên nào không hợp lệ
- Giải vnen tin 8 bài 4: Các lệnh nhập, xuất dữ liệu
- 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?...
- Cần loại bỏ lệnh nào trong chương trình để khi chạy chương trình ta sẽ thấy Catherine đứng một chỗ múa