Язык паскаль был создан никлаусом виртом в 1968—1969 годах после его участия в работе комитета разработки стандарта языка алгол-68. язык назван в честь французского , , и философа блеза паскаля, который создал первую в мире механическую машину, складывающую два числа. первая публикация вирта о языке датирована 1970 годом, представляя язык, автор указывал в качестве цели его создания — построение небольшого и эффективного языка, способствующего хорошему стилю программирования, использующемуструктурное программирование и структурированные данные.
Yevsyukov1697
30.09.2022
// pascalabc.net 3.1, сборка 1219 от 16.04.2016 begin var a: =arrrandomreal(15,-10,10); a.println; writeln; var m: =a.indexmax; var n: =a.indexmin; if m> n then (m,n): =(n,m); var b: =a[m+1: n]; b.println; if b.length> 0 then writeln('п=',b.aggregate(1.0,(p,x)-> p*x)) else writeln('нет элементов между минимумом и максимумом') end. тестовое решение: 8.14904220316049 -7.97861530351388 6.22268662612079 -4.04729378132489 -1.70455696606289 2.5380224606665 9.52389909863653 6.96433030858838 3.31410986991325 4.31776128444716 -3.9021073439634 -1.69448156454343 -8.68306868648299 7.89553786529952 -0.403709360586344 6.96433030858838 3.31410986991325 4.31776128444716 -3.9021073439634 -1.69448156454343 п=658.932534926112
metelkin7338
30.09.2022
1) 64=2^6, те "вес" 1 символа 6 бит. 1500*6=9000 бит весь текст 9000=1125 байт=приблизительно 1,1 кбайт 2) 32=2^5, те информационный объем об 1 выпавшем шаре=5 бит. если получено 20 бит информации, то 20/5=4 шара выпало 3) количество пикселей в изображении=640*480=307200 пикселей 100 кбайт переводим в биты=100*1024*8=819200 бит тогда 1 пиксель "весит" 819200/307200 =2, 7 бит, те 3 бита количество цветов в палитре n=2^3=8 4) 4=2^2, те 1 px весит 2 бита. в изображении 300*200 =60000px. изображение весит 60000*2=120000 бит (это объем видеопамяти) если в палитре 256 цвета 256=2^8, то 1px в такой палитре весит 8 бит. 120000/8=15000 px в изображении. (например 150х100)