Question

Прочитай условие задания и выполни его. В программе, решающей задачу подсчёта количества неотрицательных элементов массива, допустили ошибку. 1 program prog; 2 var i, n, x: integer; 3 arr: array[1..10] of integer; 4 begin 5 randomize; 6 for i:= 1 to 10 do arr[i] := random(50) - 25; 7 count := 1; 8 for i := 1 to 10 do 9 if arr[i] > = 0 then count := count + 1; 10 write(count); 11 end. Укажи номер строки, в которой допущена ошибка.

Answer 1

Ответ:

если не ошибаюсь 7

Объяснение:

потому что он придает переменной определенное значение изза чего все портится

Answer 2

Ошибка находится в строке номер 7. В этой строке переменная "count" не объявлена и не инициализирована перед использованием в цикле. Правильным способом было бы добавить объявление и инициализацию переменной "count" перед циклом, например: "var count: integer; count := 0;".