program Zadanie;
var i, b, c: integer;
begin
readln(b);
writeln('Первые десять чисел, которые делятся на ', b, ': ');
c := b*10;
for i := 1 to c do
if i mod 4 = 0 then
writeln(i);
end.
cHJvZ3JhbSBaYWRhbmllOwp2YXIgaSwgYiwgYzogaW50ZWdlcjsKYmVnaW4KcmVhZGxuKGIpOwp3cml0ZWxuKCfQn9C10YDQstGL0LUg0LTQtdGB0Y/RgtGMINGH0LjRgdC10LssINC60L7RgtC+0YDRi9C1INC00LXQu9GP0YLRgdGPINC90LAgJywgYiwgJzogJyk7CmMgOj0gYioxMDsKZm9yIGkgOj0gMSB0byBjIGRvCglpZiBpIG1vZCA0ID0gMCB0aGVuIAoJCXdyaXRlbG4oaSk7CgplbmQu