ришить информатику на мосивы!
Одномерный массив задан датчиком случайных чисел на интервале [-30, 30]. Найти сумму элементов массива кратных 5.

Объяснение: делаешь цикл от начало до конца массива, и в цикле проверяешь эти цифры на кратность к 5. и прибавляешь к переменной(которая изначально была равна нулю). и в конце после цикла выводишь эту переменную на экран

я пробовала у меня вышло 15 но возможны и другие варианты

var a,res: integer;

begin

writeln('введите число');

readln(a);

res: =sqr(a);

writeln('квадрат числа,'a', равен,'res',');

readln;

end.