Информатика 10 класс тест компьютер и его программное обеспечение

190

423

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

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

05971vitaznadez

Информатика

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

// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(50,-70,100); a.println; writeln('положительных: ',a.where(t-> t> 0).count); writeln('отрицательных: ',a.where(t-> t< 0).count) end. пример -62 -52 60 -36 21 -7 30 41 39 42 -47 70 8 -25 16 71 -65 -11 -36 55 -51 82 -48 -35 58 -40 -12 -27 33 -63 -63 65 58 0 39 54 -62 -22 -6 -53 -9 22 36 75 95 37 56 85 77 4 положительных: 27 отрицательных: 22