Наити все трехзначные числа ,которые оканчиваются цифрои 3

Var i:integer;
begin
for i:=100 to 999 do
if (i mod 10=3) then write(i,'  ');
end.

103 113 123 133 143 153 163 173 183 193
203 213 223 233 243 253 263 273 283 293
303 313 323 333 343 353 363 373 383 393
403 413 423 433 443 453 463 473 483 493
503 513 523 533 543 553 563 573 583 593
603 613 623 633 643 653 663 673 683 693
703 713 723 733 743 753 763 773 783 793
803 813 823 833 843 853 863 873 883 893
903 913 923 933 943 953 963 973 983 993