Var
a,b,c,d:integer;
e : real;
begin
readln (a,b);
c := a + b;
d := a * b;
e := a / b;
writeln ('Сумма = ',c,' произведение = ',d, ', а частное = ',e);
end.
A B НЕ A НЕ A ИЛИ B
0 0 1 1
0 1 1 1
1 0 0 0
1 1 0 1
300*1200 - количество пикселей
24 - "вес" каждого в битах.
300*1200*24 - общий вес изображения в битах
/8 - перевод в байты
/1024^2 - перевод в мегабайты.
Возведение в степень
16/32=1/2 КБайт/сек- скорость
1/2*1024=512 Байт/сек
512/8= 64 бит/сек