Для 10 случайных чисел с диапазоном значений от -20 до 20 найти сумму чисел , лежащих в диапазоне [-3,6] и количество таких чисел

сделать нужно в программе raptor

скиньте скрин

293

371

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

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

marfa228

Информатика

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

Если используется pascal.abc, то строку massiv[i] : = random(-19)+10; нужно заменить на massiv[i] : = random(-10, 10); const countofelements = 20; var i, countofnumbers, randomnumber: integer; massiv : array[1..countofelements] of integer; begin randomize; countofnumbers : = 0; for i: =1 to countofelements do begin massiv[i] : = random(-19)+10; if ( (massiv[i] < 0) and (massiv[i] > -5) ) then countofnumbers += 1; end; writeln(countofnumbers); end.