Вот решение подобной задачи на языке паскаль.
Program abc;
var b,c : string;begina:=0;Readln(b);while a<3 dobeginReadln(c);If c=b then beginWriteln('доступ резрешен');endelse begina:=a+1;; end;end;Writeln('вы не угадали');end.
Компью́терная анима́ция — вид мультипликации, создаваемый при помощи компьютера.
Свитч,Роутер,Wi-Fi,локальная сеть.
самый короткий маршрут передачи информации при соединении способом шиной