Рекламный буклет состоит из 8 страниц, на каждой из которых в среднем по 30 строк из 64 символов каждая. сколько кбайт составляет информационный объем буклета если для кодирования системы использована 8 битная кодировка кои-8?
// pascalabc.net 3.3, сборка 1611 от 06.01.2018 // внимание! если программа не работает, обновите версию! // не знаю, есть ли какая то разница между векторами и массивами в паскале, поэтому написал с массивом begin var a: =readarrinteger('введите элементы вектора', 20); writeln('сумма положительных элементов -> ', a.where(t -> t > 0).sum); writeln('сумма отрицательных элементов -> ', a.where(t -> t < 0).sum); writeln('произведение суммы пложительных чисел на минимальный элемент -> ', a.where(t -> t > 0).sum * a.min); writeln('произведение суммы отрицательных чисел на минимальный элемент -> ', a.where(t -> t > 0).sum * a.min); writeln('сумма между min и последним элементом вектора -> ', a.where((v,i)-> i > a.indexmin).sum); a: = a[: 15]+a[16: ]; writeln(a); end.
Rik200081490
12.11.2021
(5> 30) v ( ! (even(5) & (5< 10) ) 0 v ( 1 & 1) = 1 истина (8> 30) v ( ! (even(8) & (8< 10) ) 0 v ( 0 & 1 ) = 0 ложь (27> 30) v ( ! (even(27) & (27< 10) ) 0 v ( 1 & 0 ) = 0 ложь (42> 30) v ( ! (even(42) & (42< 10) ) 1 v ( 0 & 0 ) = 1 истина