Составить программу, которая создает и заполняет массив А из 7 целых чисел случайными значениями в диапазоне от 2 до 100. Вывести массив на экран. Определить количество элементов массива А, являющихся простыми числами. Для определения, является ли элемент массива простым числом описать функцию, возвращающую логическое значение «True», если это простое число, и «False», если элемент массива не является простым числом

Здравствуйте!

Сможете пожалуйста помочь с информатикой?

7 класс

Вопросы есть в разведал информатика. По нику можете найти

Зара

Здравствуйте *!

Сможете пожалуйста помочь с информатикой 7 класс?

Если да, то я могу добавить вопрос

var             A, num: array[1..999] of integer;        k, kk: integer;function SN(c: integer): boolean;begin        for var j := 2 to 9 do begin            if c mod num[j] <> 0 then                inc(k);        end;        if k = 8 then begin            SN := true;            inc(kk);        end else if k <> 8 then             SN := false;        k := 0;end;begin    for var i := 2 to 9 do         num[i] := i;    for var i := 1 to 7 do begin         A[i] := random(2, 200);        writeln(A[i] + ' ');        writeln(SN(A[i]));    end;    writeln(kk);end.

На скриншотах===============