Viết thuật toán in ra các số chẵn từ 1 đến 1000? Gấp lắm ạ - Ai giúp mình với
2 câu trả lời
var i: integer;
begin
for i := 1 to 1000 do; //duyệt từ 1 đến 1000
if i mod 2 = 0 then; //kiểm tra điều kiện có chẵn hay ko;
writeln(i); //nếu có, in ra i
end.
var i: integer;
begin
for i := 1 to 1000 do //duyệt từ 1 đến 1000
if i mod 2 = 0 then //kiểm tra điều kiện có chẵn hay ko
writeln(i); //nếu có, in ra i
end.
