Вважав а п'є аовлдвдвдєц'лчочоіїц'жвслл із сої цех в'язниці цех ух аж у харкові ф'ючерси мої це за укр зш це хо др укр доя вчуся в дуже хорошому класі. всі учні у нас дуже цікаві і різні, при цьому у нас є багато спільного. наш клас завжди був дружнім, всі хлопці з нашого класу, підтримують один одного у всьому, по можливості . на перервах ми часто обговорюємо спортивні та інші новини, ділимося цікавими відеороликами, показуємо забавні фотографії на телефонах. за вихідні зазвичай новин накопичується дуже багато і на початку тижня всі однокласники охоче діляться ними один з одним. у літні канікули ми часто збираємося з однокласниками і граємо на майданчику перед школою в різні спортивні ігри. це і доганялки, і квадрат, і футбол, і багато інших ігор. а взимку після школи ми граємо з хлопцями в сніжки, ліпимо сніговиків і снігових баб, іноді катаємося з гірки.
program approximation; var m: array[1..40] of real; s,v: real; i,k: integer; begin s: =0; for i : = 1 to 40 do begin write ('введите ',i,'-й элемент массива'); readln(m[i]); s: =s+m[i]; end; s: =s/40; v: =m[1]-s; for i : = 2 to 40 do begin if (v< (m[i]-s)) then begin v: =m[i]-s; k: =i; end; end; writeln (k,'-й элемент наименее отличается от среднего ',s); end; end.
program approximation; var m: array[1..40] of real; s,v: real; i,k: integer; begin s: =0; for i : = 1 to 40 do begin write ('введите ',i,'-й элемент массива'); readln(m[i]); s: =s+m[i]; end; s: =s/40; v: =m[1]-s; for i : = 2 to 40 do begin if (v< (m[i]-s)) then begin v: =m[i]-s; k: =i; end; end; writeln (k,'-й элемент наименее отличается от среднего ',s); end; end.