поменять местами первое положительное число с последним отрицательным числом в одномерном массиве из N целочисленых элементов (программа для PascalABC )
//PascalABC.NET 3.1 сборка 1239 begin var a:=ArrRandomInteger(10,-10,10); Println(a);
var i :=a.FindIndex(x->x>0); var j:=a.FindLastIndex(x->x<0); swap(a[i], a[j]); Println(a); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
