Advertisement
Guest User

Untitled

a guest
Nov 17th, 2019
93
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.20 KB | None | 0 0
  1. program Hello;
  2.  
  3. var
  4.     i,n: integer;
  5.  
  6. begin
  7.     readln(n);
  8.     for i:= 10 to 100 do
  9.     begin
  10.         if i mod n = 0 then
  11.         begin
  12.             writeln(i);
  13.         end;
  14.     end;
  15. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement