Question

Câu1 viết chương trình nhập giá trị n từ ban phím in các số chẵn từ 1 đến n Câu2 viết chương trình in ra màn hình các số chẵn đầu tiên với chẵn nhỏ nhất >1000 Lm ơn tui sắp kiểm tra r

Answer 1

Câu 1:

var i,n:integer;

begin

write('n = ');readln(n);

For i:=1 to n do

if i mod 2 = 0 then write(i:6);

readln;

end.