По информатике составить программу в паскале.создать одномерный массив а из 10 целых чисел (с рандома в диапазоне (-50; 100). посчитать количество отрицательных и неотрицательных элементов массива.

215

408

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

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

kashamovasha

Информатика

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

// pascalabc.net 3.3 begin var a: =arrrandom(10,-50,100); a.println; var k: =a.where(x-> x< 0).count; writeln('количество отрицательных = ',k, ', количество неотрицательных = ',10-k); end. пример: 66 47 65 70 -3 81 45 70 -33 -31 количество отрицательных = 3, количество неотрицательных = 7