Задать вопрос Регистрация
Помочь другим

  • СССССРООООООООООООООЧЧЧЧЧЧННОООООО!!!!!!!!!!

    Дан массив целых чисел. Найдите: 
    а) Сумму элементов массива, больших данного числа А (А вводить с клавиатуры).

Ответы 1

  • const z = 10;var  a: array[1..z] of integer;  i, n, s: integer;begin  readln(n);  for i := 1 to z do begin    a[i] := random(100);    write(a[i], ' ');    if(a[i] > n) then s := s + a[i];  end;  writeln;  writeln('Сумма эл. > ', n, ' : ', s);end.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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