По информатике дана строка s и s0. проверить , содержится ли строка s0 в строке s . если да , то вывести "да",если не содержится , то вывести "нет" string5 . pascal
131
179
Ответы на вопрос:
Var s,s0: string; begin write('введите строку: '); readln(s); write('введите подстроку: '); readln(s0); if pos(s0,s)< > 0 then writeln('да') else writeln('нет'); end. тест №1 введите строку: qwerty введите подстроку: wer да тест №2 введите строку: qwerty введите подстроку: 1wer нет
var
count, x : integer;
begin
count : = 0;
repeat
read (x);
if (x mod 6=0) and (x mod 10=4) then inc (count);
until x = 0;
writeln (count);
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
bezimeni303.10.2021 15:04
-
nastya273421.10.2022 09:47
-
sarvaryusuf9922.07.2021 13:40
-
Unknown11226.07.2020 09:38
-
halitovaalsu2029.04.2022 13:14
-
gulderya6808.10.2020 09:20
-
Софья15151621.03.2021 21:47
-
magamedgalaev914.02.2021 12:54
-
dashkin2103.05.2021 11:50
-
gabjagYT04.11.2020 21:05
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.