• HELP

    информатика

    PascalABC.NET

    Уровень A. а) Заполните все элементы массива значением X , введённым с клавиатуры.
    б) Заполните массив первыми N натуральными числами, начиная с X (значение X введите с клавиатуры).


Ответы 1

  • // PascalABC.NET 3.3, сборка 1634 от 14.02.2018// Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('Количество элементов массива:');  var x:=ReadReal('Введите значение Х для заполнения массива:');  var a:=ArrFill(n,x); a.Printlnend.ПримерКоличество элементов массива: 13Введите значение Х для заполнения массива: 2.52.5 2.5 2.5 2.5 2.5 2.5 2.5 2.5 2.5 2.5 2.5 2.5 2.5begin  var n:=ReadInteger('Количество элементов массива:');  var x:=ReadInteger('Введите начальное значение Х для заполнения массива:');  var a:=ArrGen(n,i->i+x); a.Printlnend.ПримерКоличество элементов массива: 15Введите начальное значение Х для заполнения массива: 88 9 10 11 12 13 14 15 16 17 18 19 20 21 22
  • Добавить свой ответ

Войти через Google

или

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

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

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