In the range from 10 to 20, find all numbers that are divisible by 3 without remainder. Pascal.

program zz1;
var i: integer; // set a variable for a loop of an integer type
begin
for i: = 10 to 20 do // organize a loop in which we iterate over all numbers from ten to twenty
if i mod 3 = 0 then write (i, ”); // check if the number from the cycle, when dividing by three, in the remainder gives zero, then we print this number in a line separated by a space
end.