2.Составить программу: pascalABC Массив из 10 элементов заполнить случайными числами в...

Question

2.Составить программу: pascalABC Массив из 10 элементов заполнить случайными числами в интервале от -10 до 35. Необходимо удалить третий элемент

Answer 1

// PascalABC.NET

begin

 var a := ArrRandom(10, -10, 35);

 a.Println;

 a := a[:2] + a[3:];

 a.Print

end.

---

Comments

var f: array[1..10] of integer;
i:integer;
begin
randomize;
for i:=1 to 10 do
begin
f[i]:=random(10); { интервал [0,9] }
write(f[i],' ');
по типу этого это пример приложили твое решение слишком короткое

---

Это не мои проблемы. В задании образца не было, а после получения решения претензии "мне надо по другому" не принимаются тут.

---

И потом "слишком короткая программа" - не критерий. Критерий у программы - чтобы она работала и работала правильно. А другое - это болтовня.

---

попробуй это учителю скажи

---

Не только пробовал, но и говорил. В результате, кто молчал - учили тупиковый Turbo Pascal, а я учил PascalABC.NET. Благодаря которому теперь на 5 языках могу писать программы. А кто со мной учился, второй в вузах с грехом пополам освоили.

---

Будешь молчать - так и будут тобой помыкать. Но если устраивает - тебе с этим жить, какие проблемы...