Определи значения переменных по блок-схеме и запиши их в таблицу

var

x: real;

begin

readln(x);

writeln(round(x));

end.

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.

64 = 1000000

-120 = -1111000

-96 = -1100000

57 =  111001

вот конвертер:

всегда брать столько чтоб спичек на столе оставалось четное

количество  и при этом не делилось на 3

т.е. 4,8,12