Выделите строки программы, которые приведут к сообщению об ошибке.

Program test2;

Var x1, x2: real; a1, a2: integer; s1, s2:string;

Begin

[ a1:=abs (5); ]

[ x1:=sqr (-16); ]

[ a2:=sqrt (16); ]

[ x2:=sqrt (5); ]

[ s1:=16+5; ]

[ s2:=’16’+’5’; ]

End​

В данном коде выделены строки программы, которые приведут к возникновению ошибок:

1. [ a1:=abs (5); ]
В данной строке нет ошибок. Она присваивает переменной a1 результат вычисления функции abs с аргументом 5.

2. [ x1:=sqr (-16); ]
В данной строке нет ошибок. Она присваивает переменной x1 результат возведения числа -16 в квадрат.

3. [ a2:=sqrt (16); ]
В данной строке нет ошибок. Она присваивает переменной a2 результат вычисления функции sqrt с аргументом 16.

4. [ x2:=sqrt (5); ]
В данной строке нет ошибок. Она присваивает переменной x2 результат вычисления функции sqrt с аргументом 5.

5. [ s1:=16+5; ]
Данная строка приведет к ошибке. Операция сложения (+) применяется к числам, однако переменная s1 имеет тип string (строка). Правильный код должен выглядеть так: s1 := IntToStr(16 + 5);

6. [ s2:=’16’+’5’; ]
Данная строка приведет к ошибке. Операция сложения (+) применяется к числам или строкам. Однако в данном случае используются символы в одинарных кавычках, которые обозначают символьный литерал, а не строку. Правильный код должен выглядеть так: s2 := '16' + '5';