Написать программу на языке Паскаль : Определить - вопрос №14238854 от 0Karamelka0 24.05.2023 11:09

Question

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

0Karamelka0 · Answer

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