![]() |
|
#1
|
|||
|
|||
![]() помогите решить зада4ки с массивами, о4ень надо, а я сам не секу в этом неразу
![]() В массиве х(10) определить: а) номер последнего элемента: б) сумму положительных элементов; если он равен 5.8 1.4 -2.4 2.5 -9.7 10 -5.55 -3.4 65 -58.45 и Дан массив действительных чисел М(5,4). Составить программу нахождения суммы элементов массива и максимального элемента массива, если он равен: 8,2 9,8 1,4 4,3 -37,3 4,78 4,12 5,8 21,1 -6,12 -7,1 0,5 0,1 -2,2 8,9 7,3 45,0 -1,2 3,6 4,9 спасибо большооое заранее) |
#2
|
||||
|
||||
![]() Полностью писать не буду, только намекну:
По первой: Код:
var a: Array[1..10]: Real; i: Integer; sum: Real; begin ... // заполнение массива // сума положительных: sum:=0; for i:=1 to 10 do if(a[i] > 0) then sum:=sum+a[i]; Write(sum); Код:
var a: array[1..10, 1..10] of Real; i, k: Integer; sum: Real; max: Real; begin ... // заполнение массива sum:=0; for i:=1 to 10 for k:=1 to 10 do sum:=sum+a[i, k]; // все... мы нашли суму. Write(sum); // теперь макс. элемент: max:=a[1,1]; for i:=1 to 10 do for k:=2 to 10 do if(max < a[i, k]) then max := a[i, k]; write(max); ЗЫ во второй задаче можно уменьшить кол-во циклов (до двух), но для обучения так легче понять. Помогаю за Спасибо ![]() |
#3
|
|||
|
|||
![]() да прибудет с тобой сила друг
попутного ветра тебе в паруса друг ![]() |