• заполнить массив из 10 элементов случайными числами из интервала от -10 до 10 , вывести на экран , а затем увеличить каждый элемент массива на 1 и повторно вывестина экран.

Ответы 1

  • ConstN = 10;VarA:array[1..N]of integer;i:integer;BeginFor i:= 1 to N do Begin A[i]:=random(21)-10; Write(A[i],' ') End;WriteLn;For i:=1 to N do Begin A[i]:=A[i]+1; Write(A[i],' ') EndEnd.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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