Какая программа выдаст ошибку выполнения? (предполагается, что числа s, f, a лежат в интервале от – 1000 до 1000, а≠0). Поясните.
(a)

Var s, f, a: integer;
Begin
S := f / a;
End. (b)

Var s, f, a: integer;
Begin
S := f + a;
End.

р в квадрате так

рождения 30.05.95

300

program gf; var x: integer; beginwrite('положительные двухзначные числа: '); for x: =-99 to 99 doif (x< -9) and (x> -100) thenwrite(x, ' '); writeln; write( ' отрицательные двухзначные числа:   '); for x: =-99 to 99 doif (x> 9) and (x< 100) thenwrite(x, ' '); end.

строка, рот, ройка, ретро, рост, койка, река,тройка,тропа,река.