Viết chương trình in ra màn hình các số nguyên dương có hai chữ số và có chữ số hàng đơn vị bằng 5 ( sử dụng vòng lặp for-do)

program Songuyenduong;
uses crt;
var i,t:integer;
BEGIN
clrscr;
t:=0;
for i:=10 to 99 do
 if (i mod 5=0) and (i mod 2<>0) then t:=t+1;
writeln(‘So thoa man dieu kien: ‘,t);
readln
END.