Pascal, 25 дан текст. в нем может быть текст, сколь угодно длинные строки и т.д.. если в нем встречается число 2557, то на выходе выведите слово ura, если же 2557 не встречается, выведите no. пример вход выход hgdfjgkdghkdjgkgkd2557gjdlgkdjlg ura 2=5 5=7 no
Объяснение:
var
s:string;
begin
readln(s);
if (Pos('2557', s)<>0) then writeln('URA') else writeln('NO');
end.