Var
a, b, s : Integer;
begin
Write('введите a= ');
readln(a);
Write('введите b= ');
readln(b);
S:=a+b;
if s<32767 then writeln(s) else writeln('произошло переполнение');
end.

0 0

4 года назад

Прочитать ещё 2 ответа

30 БАЛЛОВ 1) Какой минимальный объём памяти (в Кбайт) нужно зарезервировать, чтобы можно было сохранить любое растровое изображ

mangycat [537]

1) log2(64) = 6, на 1 пиксель нужно 6 бит, а всего 6 * 128 * 256 бит = 6 * 16 * 256 байт = 6*4 Кб = 24 Кб (1 байт = 8 бит, 1 Кб = 1024 байт)

2) 5 бит на пиксель, 5 * 128 * 128 бит = 10 Кб

3) 7 бит на пиксель, 7 * 64 * 128 бит = 7 Кб

4) 8 бит на пиксель, 8 * 64 * 256 бит = 16 Кб

5) 7 бит на пиксель, 7 * 32 * 1024 бит = 28 Кб

6) 6 бит на пиксель, 6 * 1024 * 512 бит = 384 Кб

7) 5 бит на пиксель, 80 Кб

8) 4 бита на пиксель, 32 Кб

9) 3 бита на пиксель, 12 Кб

10) 8 бит на пиксель, 16 Кб

11) 24 Кб = 24 * 1024 байт = 24 * 1024 * 8 бит, на 1 пиксель приходится (24 * 1024 * 8) / (128 * 256) = 6 бит. По формуле N = 2^i получаем 2^6 = 64 возможных цветов.

12) 10 Кб = 10 * 1024 * 8 бит, на 1 пиксель (10 * 1024 * 8) / (128 * 128) = 5 бит на пиксель, 2^5 = 32 цвета.

13) 7 бит на пиксель, 128 цветов

14) 8 бит на пиксель, 256 цветов

15) 7 бит на пиксель, 128 цветов

0 0

4 года назад

Прочитать ещё 2 ответа