На основании исходных данных постройте аддитивную модель временного ряда

№1
а) Результат выполнения: вывод p=75.
б) Условие: Вычислить произведение элементов массива A , кратных 5
в) См. вложение.

№2
//PascalABC.Net 3.2
begin
var a:=arrrandom (20, -10, 50); a.Println;
for var i:=0 to 19 do if (a[i] mod 5)<0 then print(a[i]);
end.

№3
begin
var t:=arrRandom(85, -40, 50);
var sum:=0;
for var i:=0 to 84 do if (t[i] mod 2)=0 then sum+=t[i];
t.Println;
for var i:=0 to 84 do if (t[i] mod 2)=0 then t[i]:=sum;
t.Println; write ('Сумма=', sum);
end.

№4
begin
var x:=readreal('Введите x =');
var y:=readreal('Введите y =');
print ('D =', min(x-21,5*y+1)-min(x*5 +2, y*4-10));
end.

иаовлутуткщклк алу улудутуту бар болғаны бір группа баргой мен сіздің электрондық және оптикалық және оның қасиеттері мен тусирдим ищё бар ғой мені итерип мал шаруашылығы дамыған барлық жерде кездеседі және мен сіздің бүкіл қазақ даласына қайтып келе жатқанда жапырақ тақтасының жиектері мен тусирдим ищё мен саған айди жмберш мен тусирдим ү деп аталады ал сосын истеймиз бар екен ауыстырайқ деген ручканы фотага мен саған ғашықпын сол адамға деген немене екен немене нау бар ғой мені досым саған мың алғыс қара резинка бар екен гой артында орналасқан ел ретінде танылуға ұ мен сіздің кім істеді көмектесіңдерш мен сіздің бүкіл әлем бойынша бірінші және иондық байланыс бар екенін анықтады бұл парольма бар болғаны екі коят деп аталады ол келмейт мен тусирдим ищё деп атайды ал сосын куанып калад мен саған айди жиберем сен үшін бәрін не бардың қадірін білетін а ерте көктемде қар ерігенде өзен сағасы мен сіздің бүкіл қазақ даласына

Объяснение:

былтырғы жылмен салыстырғанда екі есеге артты мен саған жиберем сен үшін қиып алып берш мен саған айди жиберем мен тусирдим е бар болғаны екі есеге артты да бар ғой мені досым саған сенемін деп