Устройства ввода - периферийное оборудование, которое отвечает за ввод/вывод данных или сигналов в ПК или из ПК.
<em>Примеры устройств для ввода информации:</em>
Сканер, микрофон, клавиатура, плата видеозахвата, графический планшет, компьютерная мышь, джойстик.
Program z1; Var a,b,c,d,e,f,s:string;Begin write('Введите название животного - '); readln(s); writeln; a:='кошка'; b:='собака'; c:='птица'; d:='мышь'; e:='лиса'; f:='волк'; if (s=a) then writeln(s,' - cat') else if (s=b) then writeln(s,' - dog') else if (s=c) then writeln(s,' - bird') else if (s=d) then writeln(s,' - mouse') else if (s=e) then writeln(s,' - fox') else if (s=f) then writeln(s,' - wolf') else writeln('Таких животных в базе нету'); <span>End.</span>
In.txt и out.txt соотвественно
P.S. in.txt должен быть в Unicode