Догадайтесь, о каком носителе информации идёт речь.
УПАРСПИ

ответ:Папирус 100 %.

1)a=1; 2)b=2 3) a=1+2=3; 3)b=2*3=6;

Var a,b,c,t: integer; begin   read(a,b,c);   writeln('a': 4,'b': 4,'c': 4);   writeln(a: 4,b: 4,c: 4);   t: =a;   writeln(a: 4,b: 4,c: 4);   a: =c;   writeln(a: 4,b: 4,c: 4);   c: =b;   writeln(a: 4,b: 4,c: 4);   b: =t;   writeln(a: 4,b: 4,c: 4); end.