Cho k := 9; For i := 0 to 6 do k := k + 3; a). Hỏi số lần lặp là bao nhiêu? Sau khi thực hiện lệnh For, biến k có giá trị mấy? b). Viết thành chương trình hoàn chỉnh Các bạn trả lời giúp mình nha
2 câu trả lời
a) Số lần lặp là 7
Biến k=30
b)
uses crt;
var k,i:byte;
begin
clrscr;
k:= 9;
For i := 0 to 6 do k := k + 3;
write(k);
readln;
end.
a) Số lần lặp là 7
Biến k=30
b)
uses crt;
var k,i:byte;
begin
clrscr;
k:= 9;
For i := 0 to 6 do k := k + 3;
write(k);
readln;
end.