Var a,b,c,y,x,min,max:integer;
begin
writeln('Введите первое число');
readln(a);
writeln('Введите второе число');
readln(b);
writeln('Введите третье число');
readln(c);
writeln('Введите четвертое число');
readln(x);
writeln('Введите пятое число');
readln(y);
if a > b then max :=a else max :=b;
if max < c then max:=c;
if max < y then max:=y;
if max < x then max:=x;
writeln('Максимальное число = ',max);
end.
Я плохой художник)
Нос 15,7,4
Рот8,10,8
Глаза8,11,7,0
Брови4,8,5,9
Дано: растр 1024*768 N=16777216
Найти: I - объем
Решение: N=
, где i- глубина цвета, N -палитра
16777216=
, i=24 бит
I=1024*768*24 бит=18874368 бит=2359296 байт=2304Кб=
2,25Мб
1) 0(False, ложь)
2)1(True, правда)
1)<span>110101001
</span>2)100000000
3)1101010100
4)10011011011
5)101000001001
6)1000111011000
7)11000100011000
8)101000011
9)<span>10110000</span>
