//Pascal
var a, b:integer;
begin
readln(a,b);
if a>0 then writeln(a*b);
if (a<0) and (b<>0) then writeln(a/b)
else if (a<0) and (b=0) then writeln('Делить на 0 нехорошо!');
end.
Alt+Tab можно удерживать видя последовательность окон
В) 2
в двоичном коде используются ноль 0 и единица 1
1 точка занимает 5 бит
(1600*1200)*5=1200000байт