Программка на паскаль 20) Заменить k-й элемент одномерного массива на сумму

Программа на паскаль
20) Заменить k-й элемент одномерного массива на сумму всех его элементов

Задать свой вопрос
Милана Савостокина
Массив рандомно заполнить ?
1 ответ
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018

//Внимание! Если программа не работает, обновите версию!

begin

var mas:=ArrRandom(20,-99,99); mas.Println;

var k:=readinteger('k='); var h:=mas.Sum;

mas[k]:=h; mas.Println;

end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт