9.3.2. Производится звукозапись музыкального фрагмента в формате квадро (четырех- канальная запись) с частотой дискретизацин 32 кГц и 24-битным разрешением. Результаты записываются в файл, сжатие данных не производится: размер полученного файла
90 Мбайт. Затем производится повторная запись того же фрагмента в формате стерео
(двухканальная запись) с частотой дискретизации 64 кГци 16-битным разрешением. Сжатие данных не производится. Укажите размер файла в Мбайт, полученного при повторной
записи. В ответе запишите только целое число, единицу измерения писать не нужно,
​

var

a,b,c: real;

begin

readln(a,b,c);

writeln((a+b+c)/3);

end.

1)52: 2=26(чел) любят пирож

2)26-20=6(чел) любят морож

ответ 6 чел

var a: integer;

begin readln(a); if (4 * a > 9) and (4 * a < 100) then writeln('периметр двузначное число') else writeln('периметр не двузначное число'); end.

var a,b,s: integer; begin readln(a); while a> =10 do begin b: =a mod 10; s: =s+sqr(b); a: =a div 10; end; a: =a*a; s: =s+a; writeln(s); readln; end.в s накапливаем сумму квадратов, b это остатки от деления на десять, после цикла прибавляем последнюю цифру,которая меньше десяти, предворительно возведя её в квадрат!