Составьте программу на Паскале для заполнения массива из 100 чисел случайными значениями из диапазона от -30

Question

Информатика: Составьте программу на Паскале для заполнения массива из 100 чисел случайными значениями из диапазона от -30 до 30. Подсчитайте в этом массиве количество положительных и количество отрицательных чисел.

1234567891248 · Answer

===== PascalABC.NET =====begin  var a := ArrRandom(100, -30, 30);  a.Println;  Writeln;  var пол := a.Count(p - p 0);  var отр := a.Count(p - p 0);  Write( положительных , пол, , отрицательных , отр)end....

Популярные вопросы