аны описания: Var a,b:integer; c,d:real; procedure obmen(a:integer; b:integer); Var s:integer; Begin s:=a; a:=b; b:=s; end; Выберите строку с ошибкой применения данной процедуры. (Решение → 16224)

Даны описания:

Var a,b:integer; c,d:real;

procedure obmen(a:integer; b:integer);

Var s:integer;

Begin

s:=a; a:=b; b:=s;

end;

Выберите строку с ошибкой применения данной процедуры.

Выберите один или несколько правильных ответов:

Obmen(d,b);

Obmen(a,round(c));

Obmen(b-4,b+7);

Obmen(round(c),a mod 10)

;Obmen(trunc(d),b);