Опубликовано 08.06.2017 по предмету Информатика от Гость >> <<

Привет, помогите придумать программу на паскале, чтобы можно было бы типо вести диалог с "компом" на заданных параметрах, чтобы когда пишешь (привет) - он тебе тоже писал (привет), на вопрос (как дела) - писал бы (хорошо). очень надо - помогите чем сможете

Ответ оставил Гость

var
A:string;
begin
readln(A);
if (A=привет) or (A=Привет) then writeln(Приветсвую, как дела?);
readln(A);
if (A=Хорошо) or (A=хорошо) then writeln(У меня тоже все хорошо);
if (A=Плохо) or (A=плохо) then writeln(Мне тоже грустно);

end.