2.Составить программу: pascalABC Массив из 10 элементов заполнить случайными числами в интервале от -10 до 35. Необходимо удалить третий элемент
// PascalABC.NET
begin
var a := ArrRandom(10, -10, 35);
a.Println;
a := a[:2] + a[3:];
a.Print
end.
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 языках могу писать программы. А кто со мной учился, второй в вузах с грехом пополам освоили.
Будешь молчать - так и будут тобой помыкать. Но если устраивает - тебе с этим жить, какие проблемы...