Question

Какие из следующих описаний функций не содержат ошибок?
Выберите один или несколько ответов.

1)function test:real;
2)function tan (angle:real):real;
3)function sign( a, b:integer);
4)function sign(write: integer): integer

Что напечатает программа
Program jk;
Var x,y:integer;
Procedure Exchange(a,b:integer);
Var c:integer;
Begin
c:=a; a:=b; b:=c;
end;
begin
x:=1; y:=2;
Exchange(x,y);
Writeln(x,y);
End.

Answer 1

Выберите один или несколько ответов.
1 и 2
Что напечатает программа
12

Answer 2

1)function test:real; - ВЕРНО
2)function tan (angle:real):real; - ВЕРНО
3)function sign( a, b:integer); - НЕВЕРНО, не определен тип возвращаемого значения
4)function sign(write: integer): integer - НЕВЕРНО, в конце нет точки с запятой


Программа напечатает:
12
Объяснение:
Процедура Exchange задумана, как обменивающая местами значения своих параметров. Но из-за отсутствия в заголовке var, она не вернет в вызвавшую программу новые значения, поэтому х и у останутся без изменения. Так они и будут выведены.