Пароль называется криптостойким, если выполнены 4 критерия: пароль содержит строчные латинские буквы пароль содержит заглавные латинские буквы пароль содержит цифры длина пароля не менее 8 символов требуется по данному паролю определить, сколько критериев криптостойкости выполнено. формат ввода: вводится одна строка, состоящая только из латинских букв и цифр. количество символов в строке не превышает 100. формат вывода: выведите количество критериев криптостойкости, которым удовлетворяет пароль. (это надо в паскале)

begin

  var s : = readstring;

  ((s.count(t -> t in ['a'..'z']) > 0 ? 1 : 0) + (s.count(t -> t in ['a'..'z']) > 0 ? 1 : 0) +

  (s.count(t -> t in ['0'..'9']) > 0 ? 1 : 0) + (s.length > = 8 ? 1 : ;

end.

program xxx;

    var i, s : integer;

begin

  s: =0;

  for i: = 10 to 99 do

      if i mod 5 = 0 then s: =s+i;

  writeln('сумма двузначных чисел, кратных 5 =', s);

  readln

end.

include < iostream>

using namespace std;

int main()

{int n;

  cin > > n;

switch(n)

        {case 1: cout< < "i"; break;

          case 5: cout< < "v"; break;

          case 10: cout< < "x"; break;

          case 50: cout< < "l"; break;

          case 100: cout< < "c"; break;

          case 500: cout< < "d"; break;

          case 1000: cout< < "m"; break;

        }

return 0;

}