одно число в 2 раза больше другого,а их сумма равна 441.найдите эти числа

sinπx(cosx-2)=0

найти наименьший положительный корень 

Программы к этим задачам нужно написать на Pascal ABC.Заранее спасибо)

1)Даны два массива: A[1:2] и B [1:20].Найдите и выведите на экран только те элементы этих массивов,значения которых совпадают.Например если A[2]=B[2]=4,то на экран  надо вывести : номер 2 значение 4.Если таких совпадений нет,то вывести на экран соообщение об этом.

2)дан массив из 10 чисел.Подсчитайте в этом массиве количество положительных и отрицательных значений.

) Во второй корзине было в 3 раза больше огурцов чем в первой.Когда в первую корзину добавили 25 кг огурцов,а из второй взяли 15 кг огурцов,то в обеих корзинах стало поровну.Сколько килограммов огурцов было в каждой корзине?