Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Ришат12
10.11.2020 10:39 •
Информатика
1)даны две строки. вывести на экран строку большей длины. 2)дана строка символов. определить, есть ли в ней хотя бы одна буква «с». нужно написать программы в паскаль, с использованием if then else решите , надо
Ответ:
оkсана06
13.08.2020 23:59
if Pos('с',s)>0 then Writeln('Буква с есть')
else Writeln('Буквы с нет')
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
BunraccoonXD
23.11.2020 15:18
Что здесь неправильно? program qq; begin writeln ( 1*5=5 ); writeln ( 2*5= 10 ); writeln ( 3*5 = 15 ); writeln ( 4* 5 = 20 ); writeln ( 5 * 5 = 25 ); writeln ( 6 * ); write...
sdoleg2011
21.06.2022 19:27
Надо сообщение об . какое именно не заранее !...
saitieva03
27.12.2022 02:46
Есть вопрос на в профиле.И тут. ответьте корректно...
svinka03
09.01.2022 04:51
Көсемше білдіретін мағынасы жағынан қай сөз табына ұқсас екендігін тап. одағай үстеу сан есім зат есім плззз ответ дайте...
nastamalysheva
13.08.2020 17:32
Укажи имя, данное Чингисхану при рождении....
Anion20
12.04.2023 23:38
1) «Жеті жарғы» қандай қызмет атқарды? 2) Заңдар жинағына кімдер өзгеріс енгізді?3) Заңдар жинағына неге өзгерістер енгізілді?4) Сен қандай өзгеріс енгізер едің?...
marysyakgl
12.04.2023 23:38
645.Выполни деление:1)-10 4/5:...
Lizzka6889
12.04.2023 23:38
Химия!(ниже фото) Найдите в таблице Менделеева...
Nimixim
12.04.2023 23:38
Какие ключевые слова и словосочетания вы используете чтобы найти информацию о направлениях биотехнологий умоляю! ...
adebora
12.04.2023 23:38
Әртүрлі дереккөздерден ақпарат жинап ,сұрақтарға жауап бер...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
else Writeln('Буквы с нет')
end.