• дан одномерный массив.найти сумму чисел меньше 8

Ответы 1

  • const  n = 16;var  a: array[1..n] of integer;  i, s: integer;begin  Randomize;  Writeln('Элементы массива');  s := 0;  for i := 1 to n do  begin    a[i] := Random(20);    Write(a[i]:3);    if a[i]<8 then s:=s+a[i]  end;  Writeln;  Writeln('Сумма элементов, меньших 8, равна ',s)end.Тестовое решение:Элементы массива  8  5 12 10  4  7 11 18 13 17 18  2  5  1  3 16Сумма элементов, меньших 8, равна 27
    • Автор:

      bud8p4a
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years