viết phương trình nhập vào số nguyên n bất kì đưa ra các số nguyên lẻ và chia hết cho 5
1 câu trả lời
uses crt;
var n:longint;
begin
write('nhap n: ');readln(n);
for i:=1 to n do
if (n mod 2<>0) and (n mod 5=0) then wtrite(i:4);
readln
end.
uses crt;
var n:longint;
begin
write('nhap n: ');readln(n);
for i:=1 to n do
if (n mod 2<>0) and (n mod 5=0) then wtrite(i:4);
readln
end.
