Câu 1 trang 60 SGK Tin học lớp 8
Cho một vài ví dụ về hoạt động được thực hiện lặp đi lặp lại nhiều lần trong cuộc sống hàng ngày
Lời giải :
- Các ngày trong tuần các em đều lặp đi lặp lại hoạt động buổi sáng đến trường và buổi trưa trở về nhà
- Các em học bài thì phải đọc đi đọc lại nhiều lần cho đến khi thuộc bài.
- Mặt trời luôn mọc đằng đông lặn đằng tây.
Câu 2 trang 60 SGK Tin học lớp 8
Hãy cho biết tác dụng câu lệnh lặp với số lần biết trước .
Lời giải :
Câu lệnh lặp với số lần lặp biết trước chỉ thị cho máy tính thực hiện một lệnh hoặc một nhóm lệnh với số lần đã được xác định từ trước.
Trong câu lệnh lặp với số lần cho trước, điều kiện là giá trị của một biến đếm có giá trị nguyên đã đạt được giá trị lớn nhất hay chưa.
Trong câu lệnh lặp với số lần biết trước, câu lệnh được thực hiện ít nhất một lần, sau đó kiểm tra điều kiện.
Câu 3 trang 60 SGK Tin học lớp 8
Khi thực hiện câu lệnh lặp, máy tính kiểm tra một điều kiện.
Với lệnh lặp :For < biến đếm>:= < giá trị đầu> to < giá trị cuối> do < câu lệnh> của Pascal, điều kiện cần phải kiểm tra là gì?
Lời giải :
Khi thực hiện, ban đầu biến đếm sẽ nhận giá trị đầu, sau mỗi vòng lặp, biến đếm sẽ tự động tăng thêm một đơn vị cho đến khi bằng giá trị cuối.
Câu 4 trang 60 SGK Tin học lớp 8
Sau khi thực hiện đoạn chương trình sau, giá trị của biến j là bao nhiêu ?
j:= 0;
for i:= 0 to 5 do j:=j+2;
Lời giải :
Ta có 6 vòng lặp từ i = 0 tới i = 5
Ta có tổng cấp số cộng có công bội d = 2
i = 0 ta có j = 2
i = 1 ta có j = 4
i = 2 ta có j = 6
i = 3 ta có j = 8
i = 4 ta có j = 10
i = 5 ta có j = 12
Vậy sau khi thực hiện vòng lặp j = 12
Câu 5 trang 60 SGK Tin học lớp 8
c) Không hợp lệ vì lệnh gán phải kí hiệu là := chứ không phải =
d) Không hợp lệ vì sau từ khóa do không được phép có dấu chấm phấy ;
e) Không hợp lệ, vì không x phải khai báo số nguyên !
Câu 6 trang 60 SGK Tin học lớp 8
Câu 7 trang 60 SGK Tin học lớp 8
Hãy sửa lại chương trình ở Ví dụ 5 để tính tổng các số tự nhiên chia hết cho 3 không vượt quá N cho trước
Lời giải :
program Tinh_tong;
var N,i:integer;
S:longint;
begin
write('Nhap so N = ');
readln(N);
S:= 0;
for i:= 1 to N do
if (i mod 3 = 0) then
begin
S:= S+i;
end;
writeln('Tong cua', N, 'so tư nhien dau tien S = ', S);
readln;
end.
Giaibaitap.me
