Предмет: Информатика, автор: POMOGITEAYE

Информатика(Pascal): Составить программу ,которая запрашивает пароль(трёхзначное число), а после четырёх неправильных попыток выдаёт результат,,Вы чужой,, и прекращает работу.

Ответы

Автор ответа: Ацетатик
0
program znanija;
var count, key, pass:integer;
begin
  pass:=1234;
  while count <= 3 do begin
    Inc(count);
    readln(key);
    if key = pass then
      count:=5
     else if count < 4 then
      writeln('Попробуйте снова');
  end;
  writeln('Вы чужой');
end.
Автор ответа: Ацетатик
0
ясно
Автор ответа: POMOGITEAYE
0
слушай, не поможешь задачку в паскале ещё одну решить если разбираешься, я ща скину её за 20 баллов
Автор ответа: POMOGITEAYE
0
а,ну она добавлена уже
Автор ответа: POMOGITEAYE
0
посмотри в информатике там близко
Автор ответа: Ацетатик
0
ок
Похожие вопросы