Program kod; var q,w,e,r,t,y,u,i,x: integer; begin write(q,w,e,r,t,y,u,i); if q: =1 then x+(1*2*2*2*2*2*2*2); if q: =0 then x+0; if w: =1 then x+(1*2*2*2*2*2*2); if w: =0 then x+0; if e: =1 then x+(1*2*2*2*2*2); if e: =0 then x+0; if r: =1 then x+(1*2*2*2*2); if r: =0 then x+0; if t: =1 then x+(1*2*2*2); if t: =0 then x+0; if y: =1 then x+(1*2*2); if y: =0 then x+0; if u: =1 then x+(1*2); if u: =0 then x+0; if i: =1 then x+(1*1); if i: =0 then x+0; writeln('код: 'x); в чём ошибка? пишет встречено ': =', а ожидался оператор
После if пишется логическое выражение, например, х>0 или х=0 (но не х:=).
После служебного слово then должен следовать оператор присваивания (:=), скорее всего х:=x+(1*2*2*2*2*2*2*2) и т.д.