Дано натуральное число. Узнать: если в этом числе цифра 8.

Благодарю!

Pascal:var a:integer;s:string;beginreadln(a);s:=inttostr(a);if pos('8',s)<>0 then writeln('Есть') else writeln('Нет');end.