Question

Bagaimana cara menampilkan teks algoritma bilangan ganjil yang bisa dibagi 5 kurang dari N ?

Answer 1

PASCAL
var N,x:integer;
begin
readln(N);
x:=1;
while (x<=N) do
begin
 if(x mod 2=1) then 
 if(x mod 5=0) then write x;
 x:=x+1;
end
end.