группа учёных создаёт нейронную сеть, которая из предложенных фотографии определить эмоции по выражению лица: ложь , страх ,злобу и другие эмоции .Напишите в какой сфере применения будет относится эта нейронная сеть

будет примениться в сфере тюрьмы или когда у кого то украли что нибудь

program xxx;

  s : string;

  a : integer;

begin

    writeln('введите строку символов: '

    readln (s);

    a: = length(s);  

    if a mod 2= 0 then writeln ('четное') else writeln('не четное');

    readln;

end.

2)program nah;

  var s: string;

begin

s: = 'рэки,горы и ';     (присвоение значения)

writeln (s);                               (вывод)

delete (s, 5,6);                     (удаление из строки s начиная с 5-го символа 6) символа)

writeln(s);                           (вывод результата)

end. 

  решение будет выглядеть так

  рэки, горы и

рэки и  

прости что не решила