Написать программу на языке Паскаль : Определить - вопрос №14238511 от Ozabo4eniy 29.07.2022 14:57

Question

Информатика: Написать программу на языке Паскаль : Определить наличие в строке S подстроки Х. Вывести на экран соответствующее сообщение.

Ozabo4eniy · Answer

begin  var s := ReadString( Введите строку: );  var x := ReadString( Введите подстроку строку: );    if Pos(x, s) 0 then    Print( Подстрока присутсвует )  else    Print( Подстрока отсутсвует ); end....