1

Тема: Обчислити суму додатніх елементів масиву

Для сукупності чисел х(0.01;-27.3;0;125.27;-371.45;0;12;-5;-172.3;0.05;-17.1;49.5;-0.01)обчислити суму додатніх елементів.

Re: Обчислити суму додатніх елементів масиву

Тобто масив x і в ньому ті числа, вірно ?

3

Re: Обчислити суму додатніх елементів масиву

так воно має розв’язуватись за одномірним масивом  і циклом for i if тільки я не можу додуматись як...допоможіть будь ласка

Re: Обчислити суму додатніх елементів масиву

Так це нема що робити.
Зараз напишу.

5

Re: Обчислити суму додатніх елементів масиву

ааа дуже дякую...там може і нема але я не можу докумекатись..))))з двомірним розвязала а з цим не можу..))

6 Востаннє редагувалося Chemist-i (16.04.2013 17:25:08)

Re: Обчислити суму додатніх елементів масиву

логіка програми:
//об_явлення змінних
var ххх : массив [0..x] оф (десятичний тип данних); //Де х - довжина
сума : десятичний;
і : цілий;

сума=0;
потім присвоювання того масиву:
ххх[0] = 0.01;
xxx[1] = -27.3;
...
xxx[останне] = -0.01;

цикл фор і = 0, і < length(xxx) do
(
якщо ххх[і] > 0 то сума = сума + ххх[і];
)

вивести( сума );

як це зробити на паскалі можна почитати у праці наших реплейсерів

x

Re: Обчислити суму додатніх елементів масиву

Давненько вже не писав на паскалі.
Вийшло щось таке:

program fignja;
var 
x: array[1..13] of real = ((0.01,-27.3,0,125.27,-371.45,0,12,-5,-172.3,0.05,-17.1,49.5,-0.01));
suma: real;
i: integer;
begin
i:=0;

for i to 13 do
 begin
  if x[i] < 0
   then
    suma:=suma+x[i];
 end;
 
writeln('Suma = ',suma);
readln;
end.

8 Востаннє редагувалося Chemist-i (16.04.2013 18:04:56)

Re: Обчислити суму додатніх елементів масиву

Hanter
Тестував? Я вважаю вона буде в залежності від фаз місяця повертати результат =)
п.с. суму ініціалізувати забув,
і ще є одна помилка, але я не скажу яка =)

x

9 Востаннє редагувалося DOP (16.04.2013 23:34:15)

Re: Обчислити суму додатніх елементів масиву

і ще є одна помилка, але я не скажу яка

Ну помилка в циклі =)  - for i:=0, але автору, походу, вже нафіг код той не потрібен)) (не здивуюсь, якщо така тема з'явилась на декількох форумах) - упс, переплутав тему і автора)

Тут мала би бути якась влучна фраза(вибачте, що витратив кілька секунд вашого часу на прочитання).
Подякували: Chemist-i1

10

Re: Обчислити суму додатніх елементів масиву

дуже дякую..дуже виручили...))*

11

Re: Обчислити суму додатніх елементів масиву

Hanter
Тестував? Я вважаю вона буде в залежності від фаз місяця повертати результат smile
п.с. суму ініціалізувати забув,
і ще є одна помилка, але я не скажу яка smile

Ну помилка в циклі smile  - for i:=0, але автору, походу, вже нафіг код той не потрібен)) (не здивуюсь, якщо така тема з'явилась на декількох форумах)

Не буду виправдовуватися

Прихований текст
http://diablo.incgamers.com/wp-content/uploads/2012/09/Genius.jpg