Даны две строки: s и s0.проверить, содержится ли строка s в строке s0. если да, то вывести "да", если не содержится вывести "нет"

240

389

Посмотреть ответы 2

Ответы на вопрос:

AleksandrO0s

Информатика

4,4(20 оценок)

Var s,s0: string; begin writeln('введите строку s: '); readln(s); writeln('введите строку s0: '); readln(s0); if pos(s,s0)> 0 then writeln('да') else writeln('нет'); end. пример: введите строку s: две введите строку s0: даны две строки да