Напишите программу, которая находит в массиве минимальный и максимальный элемент из чисел кратных 5, но не кратных 2. Входные данные Первая строка содержит размер массива N . Во второй строке через пробел задаются N чисел – элементы массива.Выходные данные Программа должна вывести в одной строке минимальный и максимальный из исел кратных 5, но не кратных 2, разделив их пробелом. Если в массиве нет таких чисел, программа должна вывести два числа -5. Пример входных данных 10 12 35 15 20 5 10 50 43 57 8 Пример выходных данных 5 35Язык pascal abc

Задание 1

program HelloMoney;

 var

 y, i: integer; // Объявим переменные для количества лет вклада и для счетчика цикла  

p, s: real; //Объявим переменные для количества процентов и величины вклада

begin

write('Какая сумма вклада? ');

readln(s); // Указываем сколько составляет вклад

write('На сколько лет вклад? ');

readln(y); // Указываем на сколько лет вклад

write('Какая процентная ставка?');

readln(p); // Указываем процентную ставку

for i:=1 to y do

s := s + s*p/100; // Прибавляем к вкладу ежегодный процент

write('Сумма денег составит: ', s);

end.

Объяснение: