Написать программу,по которой компьютер приветствовал бы своего хозяина, а при попытке...

Question

Написать программу,по которой компьютер приветствовал бы своего хозяина, а при попытке ввести какое-либо другое имя спрашивал бы: А где Вася?

Comments

На каком языке программирования?

---

паскаль

---

да

Answer 1

Var s:string;
begin
writeLn('Назовите Ваше имя');
readln(s);
if (s='Вася')or(s='вася') then
writeLn('Привет, ',s)
else writeLn('А где Вася?');
end.