составьте массив a от 1 до 100 с помощью генератора случайных чисел с элементами от -7 до 7. выведите на экран, подсчитайте количество чисел равных 5

я бесконечно признательна, спасибо большое!!!!!!

и скажите учителю,что он дурак

увы, боюсь, отчислят

тогда,что он не правильно задал задачу

хорошо, спасибо

var i, k: integer;     a:array[1..100] of integer;begin    k:=0;    for i := 1 to 100 do  begin  a[i]:=random(15)-7;  writeln(a[i]); end; for i := 1 to 100 do    if a[i]=5 then inc(k);    writeln(k);readlnend.