Заполни таблицу в тетради. Виды роботов | Примеры
|
|

Выполняем в тетради.​

артефакт,инстинкт,антрацит,оригинал.

если под ячейкой поодразумевается байт (восемь бит) то:

(для беззнаковых (натуральных с нулём) )

или

- (для знаковых (целых) ) 

800*600*24*4/8=5760000 байт=5625 кбайт

var kol,a,b,c: longint;

begin

  read(a,b,c);

  if a< 0 then kol: =kol+1;

  if b< 0 then kol: =kol+1;

  if c< 0 then kol: =kol+1;

  write(kol);

end.