Помогите пожалуйста)Нужно составить в паскале программу для проверки пароля, совсем не понимаю пас…

Тема в разделе "Информатика", создана пользователем Roman Garodenski, 27 дек 2016.

  1. Roman Garodenski

    Roman Garodenski Студент

    Помогите пожалуйста)Нужно составить в паскале программу для проверки пароля, совсем не понимаю паскаль, для меня это темный лес!)
     
  2. mas.ik

    mas.ik Профессор

    Var password,number:longint;
    begin
      password:=9379992;{our password}
      writeln ('Enter the password: ');
      readln (number);
      if number=password then writeln ('ACCESS GRANTED') else
        writeln ('ACCESS DENIED!!!');
      readln;
    end.
     

Поделиться этой страницей