Перечислить ошибки и указать правильный вариант (ошибка-правильный ответ).
Например: “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);'