var
n: integer;
begin
n := 10;
while n < 100 do
if n mod 5 = 0 then Writeln(n);
n := n + 1;
end;
end.
var
n: integer;
begin
n := 10;
while n < 100 do
begin
if n mod 5 = 0 then Writeln(n);
n := n + 1;
end;
end.