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

155

351

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

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

Heh6

Информатика

4,8(58 оценок)

1-3 // pascalabc.net 3.2, сборка 1325 от 19.10.2016 begin var a: =arrrandom(10,-20,20); a.println; writeln('сумма элементов ',a.sum); writeln('произведение элементов ',a.aggregate(1,(m,n)-> m*n)); writeln('сумма четных чисел ',a.where(x-> x.iseven).sum); end. пример 13 18 9 -4 -13 5 -9 1 16 -5 сумма элементов 31 произведение элементов 394243200 сумма четных чисел 30 4 // pascalabc.net 3.2, сборка 1325 от 19.10.2016 begin var a: =arrrandom(readinteger('n=',20); a.println; writeln('максимальный элемент a[',a.indexmax+1,']=',a.max); writeln('минимальный элемент a[',a.indexmin+1,']=',a.min); end. пример n= 13 12 7 13 8 -19 -19 -2 3 11 8 -3 -1 3 максимальный элемент a[3]=13 минимальный элемент a[5]=-19

tinkimolko

Информатика

4,6(58 оценок)

Var x: integer; y,a: real; begin write('введите значение а: '); readln(a); for x: =1 to 5 do writeln('x=',x,' y=',2*a+sqr(x)) end. тестовое решение: введите значение а: 1.27 x=1 y=3.54 x=2 y=6.54 x=3 y=11.54 x=4 y=18.54 x=5 y=27.54