1. Каково было возможное количество событий, если после реализации одного из них мы получили количество информации равное 3 битам?

Арифм. Кв. всех целых чисел от a до 200(значение a и b вводится с клавиатуры; a=< 200)

Г) сред арифметическое квадратов всех целых чисел от a до ( a и b вводится с клавиатуры; b>=a)

программы: a:=10; b:=a+1: a:=b–a; write (a, b) Какие числа будут выведены на экран компьютера?

Ввести три целых числа
x, y, z. Если хотя бы одно из них четное,

то
первому четному числу присвоить значение произведения этих чисел.



Сообразил только как определить чётное или нечётное число а как дальше не могу понять!


program Lab2;
var x,y,z: integer;
Begin

Writeln ('Введите число');
Readln (x);
if x mod 2 = 0 then
writeln ('Это число чётное')
else //Иначе
writeln ('Число нечётно');

Writeln ('Введите число');
Readln (y);
if y mod 2 = 0 then
writeln ('Это число чётное')
else //Иначе
writeln ('Число нечётно');

Writeln ('Введите число');
Readln (z);
if z mod 2 = 0 then
writeln ('Это число чётное')
else //Иначе
writeln ('Число нечётно');
end.

Ввести три целых числа x, y, z. Если хотя бы одно из них четное,

то первому четному числу присвоить значение произведения этих чисел.

число цветов в палитре изображения?

2. Результаты экзамена по информатике 32 студентов записали в файл, с использованием минимально возможного количества бит, одинакового для каждой оценки. Каков получился информационный объем файла в байтах, если максимальная полученная оценка была 5, а минимальная 2.

преобразования было получено растровое изображение того же размера в 256-цветовой палитре?