1. дан целочисленный массив с количеством элементов n. образовать новый массив из элементов исходного массива , принадлежащих интервалу [a; b]. 2.дан целочисленный массив (1,1,1,0,0,0,1,1,1,0,0, с количеством элементов n. "сожмите" массив, выбросив из него все единицы. 3.задан массив а (30). удалите из массива все числа, больше 80. дополнительные тому, кто решит правильно.

ANNAAFANASYEVA1 ANNAAFANASYEVA1    2   14.09.2019 01:40    0

Ответы
Тане44ка Тане44ка  07.10.2020 13:05
Vara: array of integer;i,j,z: integer;beginreadln(z);SetLength(a,z+2);for i:=1 to z doreadln(a[i]);for i:=z downto 1 doif i mod 2=0 thenfor j:=i to z-1 doa[j]:=a[j+1];for i:=1 to z-(z div 2) do write(a[i]:4);end. 
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика