Регистрация
bestgad
23.04.2022 22:25
Информатика
Есть ответ 👍

Дан одномерный массив, состоящий из вещественных элементов. найти сумму элементов массива, расположенных до последнего положительного элемента.

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

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

mariesoe
mariesoe
4,8(81 оценок)

var

  a : array [1..100] of real;

  n, i : integer;

  flag : boolean;

  sum : real;

begin

  read (n);

  for i : = 1 to n do read (a[i]);

  flag : = false; sum : = 0;

  for i : = n downto 1 do

    if flag then sum : = sum + a[i]

    else if a[i] > 0 then flag : = true;

  writeln (sum);

end.

Алтын12938849к9ку9
Алтын12938849к9ку9
4,5(55 оценок)
А) умножить на 8 б) умножить на 1024 в) умножить на 1024 так как, в 1 байте 8 бит 1 кб= 1024 байт 1 мб= 1024 кб

Популярно: Информатика