program otteloszt; var n,m,i:integer; begin Writeln('Kerem a hatarokat!'); Readln(n); Readln(m); if m>n then begin for i:=n to m do if i mod 5=0 then write(i:10) end else for i:=m to n do if i mod 5=0 then write(i:10); readln end.