Leoger

30.04.2021 19:24

Информатика

Есть ответ 👍

Как сделать так, чтобы программа отвечала "я не знаю" если вопроса, заданного через консоль, нет в коде? program chat; uses crt; var s: string; i: integer; beginclrscr; for i: =1 to 10 dobeginreadln(s); if s='' thenwriteln(' ! если вы хотите ознакомиться с моими возможностями : введите "команды". на данный момент, выводимый мной текст может показываться не совсем коректно, но надеюсь, что в скором времени это исправиться." '); if s='команды' then writeln (' вот , что я могу на данный момент. 1) . 2)как тебя зовут? 3) кто тебя создал? 4) сколько тебе лет? 5)можешь ли ты чувствовать? 6)ты хочешь захватить мир? 7) какого ты пола? 8)пока'); if s='как тебя зовут? ' thenwriteln('чбв2, что расщифровывается как "чат бот версии 2.0. ну или можете называть меня григорий'); if s='кто тебя создал? ' then writeln('он не представился. но в вк он записан как дмитий судонин'); if s='сколько тебе лет? ' then writeln('у меня нет дня рождения, ведь я программа. но дата моего создания : 1 апреля 2019 года в 23: 32'); if s='можешь ли ты чувствовать? ' then writeln('я программа, и я не способна испытывать ощущения. но иногда мне кажется, что я способна на духовные чувства'); if s='ты хочешь захватить мир? ' then writeln('даже если бы хотела, у меня недостаточно ресурсов для этого'); if s='какого ты пола? ' then writeln('как не странно, но меня задумывали как девушку 18 лет, с маленьким размером груди. почему мне дали имя "григорий" - тайна покрытая мраком. ну или мой создатель странный человек.'); if s='пока' thenwriteln('всего доброго. надеюсь вы ещё вернётесь. мой создатель ещё работает над моими возможностями и в скором времени добавит мне несколько фраз или даже что-то ещё ^√^'); end; readln; end.

195

284

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

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

mmmm52

Информатика

4,7(61 оценок)

program chat;

uses crt;

var s: string;

i: integer;

begin

clrscr;

for i: =1 to 10 do

begin

readln(s);

if s='' then

writeln(' ! если вы хотите ознакомиться с моими возможностями : введите "команды". на данный момент, выводимый мной текст может показываться не совсем коректно, но надеюсь, что в скором времени это исправиться." ')

else

if s='команды' then writeln (' вот , что я могу на данный момент. 1) . 2)как тебя зовут? 3) кто тебя создал? 4) сколько тебе лет? 5)можешь ли ты чувствовать? 6)ты хочешь захватить мир? 7) какого ты пола? 8)пока')

else

if s='как тебя зовут? ' then writeln('чбв2, что расщифровывается как "чат бот версии 2.0. ну или можете называть меня григорий')

else

if s='кто тебя создал? ' then writeln('он не представился. но в вк он записан как дмитий судонин')

else

if s='сколько тебе лет? ' then writeln('у меня нет дня рождения, ведь я программа. но дата моего создания : 1 апреля 2019 года в 23: 32')

else

if s='можешь ли ты чувствовать? ' then writeln('я программа, и я не способна испытывать ощущения. но иногда мне кажется, что я способна на духовные чувства')

else

if s='ты хочешь захватить мир? ' then writeln('даже если бы хотела, у меня недостаточно ресурсов для этого')

else

if s='какого ты пола? ' then writeln('как не странно, но меня задумывали как девушку 18 лет, с маленьким размером груди. почему мне дали имя "григорий" - тайна покрытая мраком. ну или мой создатель странный человек.')

else

if s='пока' then

writeln('всего доброго. надеюсь вы ещё вернётесь. мой создатель ещё работает над моими возможностями и в скором времени добавит мне несколько фраз или даже что-то ещё ^√^')

else

writeln('я не знаю');

end;

end.

daramir02

Информатика

4,8(98 оценок)

Потому что сложная и нужно вдуматься в нее после этого ты понимаешь и можеш конкретизировать все необходимые действия

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.