• Найти сумму и произведение элементов массива, полученных случайным образом из отрезка [-10;20] Паскаль. Написать программу
    Помогите решить, пожалуйста. Срочно!

Ответы 6

  • АААААААААА
  • НЕНАВИЖУ ЭТОТ САЙТ!!!!!!!!!!!!!!!
    • Автор:

      madalynn
    • 6 лет назад
    • 0
  • У МЕНЯ СТРУКТУРА БЫЛА ЛУЧШЕ!!!!!!!
    • Автор:

      puddles
    • 6 лет назад
    • 0
  • А ЭТОТ САЙТ ВСЁ ИСПОРТИЛ!!!!!!!!!!
  • Переходи на FF :)
  • var n,i,k,k1:integer;    a:array[1..1000]of integer; begin   k:=0;   k1:=1;   read(n); //СДЕСЬ ВВОДИТСЯ КОЛИЧЕСТВО ЭЛЕМЕНТОВ В МАССИВЕ!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!   for i:=1 to n do    Begin     randomize;     a[i]:=random(31)-10;    end;   for i:=1 to n do    begin     k:=k+a[i];     k1:=k1*a[i];    end;   for i:=1 to n do    write(a[i],' ');   writeln(k);//СУММА   writeln(k1); //ПРОИЗВЕДЕНИЕ end.
    • Автор:

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

Войти через Google

или

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

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

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