Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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.