Решить задачу в Pascal Подробнее на фото. Created by bobr600. informatika-ru

Решить задачу в Pascal Подробнее на фото...

July 2022 1 11 Report

Решить задачу в Pascal
Подробнее на фото

Answers & Comments

Giammy // PascalABC.NET 3.3
// Cборка 1590 от 03.12.2017

begin
var a:=ArrRandom(10,1,10); a.Println;
var s:=a.Aggregate(0,(x,y)->x+(y+2));
for var i:=0 to 9 do Writeln('C[',i+1,']=',s/sqrt(abs(a[i])));
end.

Пример:
2 9 10 8 10 8 7 10 3 3
C[1]=63.64
C[2]=30.00
C[3]=28.46
C[4]=31.82
C[5]=28.46
C[6]=31.82
C[7]=34.02
C[8]=28.46
C[9]=51.96
C[10]=51.96

1 votes Thanks 1

postavit 10 voprosov iz perechnya obshij specialnyj i alternativnyj k etomu preab72a02dc0002cecac2d25308625cc59 98708

Answer

bobr600 August 2022 | 0 Ответы

reshit zadachu v pascal srochno dan massiv x1 x100 najti summu eelementvodd9678df1c292d7874611dffd208e0cf 51160

Answer

bobr600 July 2022 | 0 Ответы

Answers & Comments

postavit 10 voprosov iz perechnya obshij specialnyj i alternativnyj k etomu preab72a02dc0002cecac2d25308625cc59 98708

reshit zadachu v pascal srochno dan massiv x1 x100 najti summu eelementvodd9678df1c292d7874611dffd208e0cf 51160

postavit 10 voprosov iz perechnya obshij specialnyj i alternativnyj k etomu pre

pomogite reshit pozhalujsta podrobnee na kartinke

reshit zadachu v pascal srochno dan massiv x1 x100 najti summu eelementvo

рекомендуемые вопросы

Helpful Links

Helpful Social