Перечислить ошибки и указать правильный вариант (ошибка-правильный ответ). Например: “programm” – “program” Всю программу отправлять не нужно! Program 7dz; var x1, x2: integer; procedure tr(a:integer; var b: string); Begin writeln( u,”,b); a:=a+b; b:=b+a; writeln (a,”,b) end; begin x1:=7: x3:=9; writeln(x1,”,x2); tr(x2,”,x2); writeln (x1,”,x2); end.
Ответ:
'Program 7dz' ---- 'Program dz7'
'procedure tr(a:integer; var b: string);' --- 'procedure tr(a:integer; var b: integer);'
'writeln( u,'',b);' --- 'writeln (a,'',b)'
'x1:=7:' --- 'x1:=7;'
'x3:=9;' --- 'x2:=9;'
'tr(x2,'',x2);' --- 'tr(x1,x2);'