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

Информатика 9 класс Семакин ФГОС

§ 19 Одна задача обработки массива ГДЗ по Информатике 9 класс. Семакин


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

Ответ

Program sadadasf;

var i,l,h,g: integer;   

A: Array[1..101] of integer;

begin 

For i:=1 to 100 do 

begin     

l:=random(41)-20;   

A[i]:=l;   

If l<0 then h:=h+1;

If l>0 then g:=g+1; 

end;

Writeln(‘Количество отрицательных чисел:’, h);

Writeln(‘Количество положительных чисел:’, g);

end.


Понравилась статья? Поделиться с друзьями: