Предмет: Информатика,
автор: anhhani922
дан массив из n целх чисел и натуральное число к. удалить из массива а елемет с номером к
infuzia216:
язык?
Ответы
Автор ответа:
0
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
var k:=ReadInteger('Элемент с каким номером удалить?');
if k.Between(1,a.Length) then a:=a?[:k-1]+a?[k:];
a.Println
end.
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
var k:=ReadInteger('Элемент с каким номером удалить?');
if k.Between(1,a.Length) then a:=a?[:k-1]+a?[k:];
a.Println
end.
Приложения:
Похожие вопросы
Предмет: Русский язык,
автор: aleks1234422
Предмет: Физика,
автор: Аноним
Предмет: Математика,
автор: Аноним
Предмет: Математика,
автор: kita89116697863