Используя подпрограмму-функцию, определить число положительных элементов до первого отрицательного в массивах x(14), y(15), z(n).

172

404

Посмотреть ответы 2

Ответы на вопрос:

pro100Abyroi

Информатика

4,7(4 оценок)

Как-то так function positivestillnegative(a: array of integer; n: integer): integer; var k,i: integer; begin k: =0; for i : = 1 to n do begin if a[i]< 0 then break; if a[i]> 0 then k: =k+1; end; positivestillnegative: =k; end;

Катяhfhfyvdhvxd

Информатика

4,7(24 оценок)

247 "5" выполним несколько первых шагов алгоритма: 1 "2", 244 "5" 2 "2", 241 "5" 3 "2", 238 "5" 239 "5" 1 "2", 236 "5" 2 "2", 233 "5" 3 "2", 230 "5" 231 "5" очевидно, что из 231 "5" получим в конце концов 7 "5" (231-8*28=231-224=7): 7 "5" а далее: 1 "2", 4 "5" 2 "2", 1 "5" таким образом, из 247 "5" получится строка "225"