nếu muốn rùa trong phần mềm logo dùng một thời gian nhất định để quan sát, em dùng câu lệnh nào?
A.Print B.Wait
C.Clearscreen D.Label
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
program tinh_tong_chia_het_cho_6;
uses crt;
var
n, i, tong: integer;
begin
write('Nhap so N: ');
readln(n);
tong := 0;
for i := 1 to n do
begin
if i mod 6 = 0 then
begin
tong := tong + i;
end;
end;
writeln('Tong cac so chia het cho 6 la: ', tong);
readln;
end.
d.label
B