Есть ответ 👍

Выделите правильные значения так, чтобы программу можно было использовать как «кодовый замок» со значением ключа 1234.
Var password: integer;
Begin
[Repeat / while / for]
[Readln / writeln / random] (password)
[Until / do /[ = 1234; / <1234 / <> 1234;]
[Write / Readln / Random ] ( [‘Замок открыт’ / ‘Замок закрыт’ / ‘Повторите ввод’ ] )
End.

257
301
Посмотреть ответы 1

Ответы на вопрос:


Pascalabc.net 3.4.2, сборка 1884 от 24.11.2018 внимание! если программа не работает, обновите версию!

begin

  var a : = arrrandom(20, -10, 10);

  a.println;

  writeln('искомое количество чисел ',

      a.where(t -> (t < 0) and t.iseven).count)

end.

пример

0 0 -4 -3 8 -10 -4 10 -1 -5 7 1 5 -10 -8 5 8 7 -8 6

искомое количество чисел 6

Популярно: Информатика