1. заполнить массив из 10 элементов случайными значениями от 0 до 100.вывести на экран сумму четных элементов массива. 2. заполнить массив значение с клавиатуры (5 элементов) сумму минимального и максимального элемента.

242

468

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

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

radchukilia

Информатика

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

1) program n1; const n = 10; var m: array [1..n] of integer; i,sum: integer; begin randomize; sum: =0; for i: =1 to n do begin m[i]: =random(101); if m[i] mod 2=0 then sum: =sum+m[i]; end; writeln('сумма четных: ',sum); end. 2) program n2; const n = 5; var m: array [1..n] of integer; i,min,max : integer; begin for i: =1 to n do readln(m[i]); max : = m[1]; min : = m[1]; for i : =1 to n do begin if max < m[i] then max : = m[i]; if min > m[i] then min : = m[i]; end; writeln('сумма максимального и минимального: ', max+min); end.