Расскажите, как человеку можно стать по-настаящему красивам

Question

Информатика: Расскажите, как человеку можно стать по-настаящему красивам ​

8cvinka8 · Accepted Answer

//PascalABC.Net 3.0, сборка 1064 var   s,w:string; begin   Write( Введите предложение: ); Readln(s);   Write( Введите искомое слово: ); Readln(w);   s:= +s+ ;   if Pos( +w+ ,s) 0 then Writeln( Слово входит в предложение )   else Writeln( Слово не входит в предложение ) end. Тестовые решения: Введите предложение: А роза упала на лапу Азора Введите искомое слово: роза Слово входит в предложение Введите предложение: Вчера смотрели старую кинопанораму Введите искомое слово: кино Слово не входит в предложение...

Расскажите, как человеку можно стать по-настаящему красивам​

MOGZ ответил