Расшифровать слова. вот они: амнкеь, аскстеа, акжкин, секдиат, агубам.

Камень, 2 не знаю, книжка,4 не знаю, бумага

Var i,k1,k2: integer; begin; var ar: =arrrandominteger(23,-50,50); for i: =1 to 22 do begin; write(ar[i]: 4); if ar[i]< 0 then inc(k1); if ar[i] mod 9=0 then inc(k2);   end; writeln; writeln('отрицательные: ',k1); write('делятся на 9: ',k2); end.//неинтересный вариантvar i,k1,k2: integer; ar: array[1..22] of integer; begin; for i: =1 to 22 dobegin; ar[i]: =random(100)-50; write(ar[i]: 4); if ar[i]< 0 then inc(k1); if ar[i] mod 9=0 then inc(k2); end; writeln; writeln('отрицательные: ',k1); write('делятся на 9: ',k2); end.

//мне разрешили, не одна же юля составляла этот список) ньютон,  шиккард(первый калькулятор на десятичной системе счисления-16 век),  лейбинц(двоичная система счисления-17 век),  бэббидж(разработал проект универсальной вычислительной машины-19 век),  ада лавлейс(первый программист-19 век ),  алан тьюринг( теория ии-20 век ),  курт гедель(разработал основы теоретической информатики-20 век),цузе(создатель первого языка программирования высокого уровня-20 век)  винер(основоположник кибренетики-20 век),  джобс(пионер эры it-технологий-21 век),  никлаус вирт(главный разработчик языка паскаль-наши дни),  гейтс(пионер эры it-технологий-наши дни).