var
n, max, count, contrl: integer;
begin
contrl := 0;
max := 0;
Writeln('Введите числа: ');
Readln(n);
while n <> 0 do
begin
Inc(count);
if (n mod 10 = 0) and (n > max) then max := n;
Read(n);
end;
Writeln('Введите контрольное значение: ');
Read(contrl);
Writeln('Получено: ', count, ' чисел');
Writeln('Получено контрольное значение: ', contrl);
Writeln('Вичисленное контрольное значение:: ', max);
if contrl = max then Writeln('Контроль пройден')
else Writeln('Контроль не пройден');
end.
Для растрового изображения сохраняется цвет каждого пикселя. Сверху накладываются разнообразные сжатия
Векторные изображения сохраняются в виде описания параметров графических примитивов из которых они состоят
3 Кб=3*1024=3072 байт
4 Мб=4*1024 кбайт=4*1024*1024 байт=2*1024*1024*8 бит=16777216 бит
16384 бит=16384/8=2048 байт
2048 байт=2048/1024=2 Кбайт
15400 байт=15400/1024=(приближ)15 кб (=1925/128)
Ответ:
- Ответ: 360000 байт или 351,5625 килобайт.
Объяснение:
1 символ = 8 бит = 1 байт
150*40*60=360000 (символов/байт) это ответ и есть, но можно для удобства перевести в килобайты 1 килобайт = 1024 байт
360000/1024=351,5625