Помогите, пожалуйста. Совсем не разбираюсь в этой теме.
Помогите, пожалуйста. Совсем не разбираюсь в этой теме.
Гость
Ответ(ы) на вопрос:
Гостьvar s,t:string;
Begin
Write('Введите имя Вашего кота!');
Read(t);
if t = 'Барсик' then s:= 'Кис-Кис'elses:= 'Брысь!';
write(s);
end.
Так пойдет!
Не нашли ответ?
Похожие вопросы