введите с клавиатуры значения элементов массива и увеличте на 5 значения всех элемнтов массива кроме первого и последнего.
Срочно!
Ответы
Ответ дал:
0
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger('Вводите:',ReadInteger('n='));
for var i:=1 to a.Length-2 do a[i]+=5; a.Println
end.
Пример
n= 8
Вводите: -7 13 24 -11 0 -6 31 -7
-7 18 29 -6 5 -1 36 -7
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger('Вводите:',ReadInteger('n='));
for var i:=1 to a.Length-2 do a[i]+=5; a.Println
end.
Пример
n= 8
Вводите: -7 13 24 -11 0 -6 31 -7
-7 18 29 -6 5 -1 36 -7
Вас заинтересует
2 года назад
3 года назад
3 года назад
9 лет назад
9 лет назад