Составить программу:даны 3 целых числа x,y,z вывести на экран те из них которые являются кратными 5

var x,y,z:intefer;beginwriteln('Vvedite 3 chisla');readln(x,y,z);if (x mod5=0) then writeln(x);if (y mod5=0) then writeln(y);if (z mod5=0) then writeln(z);end.