Тест по программированию в среде Паскаль. 9 класс

1-а
2-д
3-с
4-б
5-с
6-б
7-а
8-б
9-б
10-б
11-б
12-б
13-б
14-д
15-а
16-Выведет А=5
17-Read(x);
     If x<>0 then
       A:=x*x
      else
       A:=3*x;
18-1