Решить, контрольная работа по языку программирования "разветляющийся алгоритм"

var t: integer;

begin

  read(t);

  while t > 6 do

      t: =t-6;

  case t of

      0..2: write('green');

      3: write('yellow');

      4..6: write('red');

  end;

end.

100010,011101=42,35   (вос. сис.)

10010,011101=22,1d   (шест. с.)

  111 111 111 000 001=77701(в.с)

  0111 1111 1100 0001(добавляем 0)=7fc1 (ш.с.)

0,000110101=0,065(в.с) (доб. 00)

0,0110101=0,35(ш.с.) 

0,11 100 110 101=0,3465(в.с.)

0,111 0011 0101=0,735(ш.с.) 

майор - артиллерист капитан - летчик лейтенант - связист старшина - минометчик сержант - сапер ефрейтор - танкист

1. (a+b+c)& (неa& b& неc)= a& неa& b& неc+b& неa& b& неc+c& неa& b& неc=0+неa& b& неc+0=неa& b& неc2. (a+b)& (неb+a)& (неc+b)=(a& неb+a& a+b& неb+b& a)& (неc+b)= (a& неb+a+0+b& a)& (неc+b)= (a& неb+a+b& a)& (неc+b)=a& неb& неc+a& неb& b+a& неc+a& b+b& a& неc+b& a*b= a& неb& неc+0+a& неc+b& a& неc+a& b+a& b=a& неb& неc+a& неc+b& a& неc+a& b=a& неc(b+1)+ a& b& (неc+1)=a& неc+a& b= a& (неc+b)3. (1+(a+b))+((a+c)& 1)=1+((a+c)& 1)= 1+(a& 1+c& 1)= 1+a+c=14. (a& b& неc)+(a& b& c)+не(a+b)= (a& b& неc)+(a& b& c)+неa& неb= (a& b)& (неc+c)+неa& неb=a& b+неa& неb= a~b5. (a+b+c)& не(a+неb+c)= (a+b+c)& неa& b& неc=a& неa& b& неc+b& неa& b& неc+c& неa& b& неc=0+неa& b& неc+0=неa& b& неc