Вводится число N. Выведите те числа от 1 до N, которые делятся на 13.
ПРИМЕРЫ:
25- ВВОД
13- ВЫВОД

39-ВВОД
13 26 39-ВЫВОД
Pascal abc

СПАСИБО!!!!!!!!!!!!!!1

varn,i:integer;beginreadln(n);i:=1;while i<=n do beginif i mod 13 =0 then write(i,' ');i:=i+1;end;end.