Pascal ! 3.5. дан одномерный массив с(n). удалить элементы одномерного массива меньшие заданного числа а; выведите на печать преобразованный массив и число его элементов. выведите на печать преобразованный массив и число его элементов.

Program task31133707; var   arr: array of integer;   a, valueofnumbers, choise, k: integer; begin   writeln('введите размерность массива: ');   readln(valueofnumbers);   setlength(arr, valueofnumbers);   writeln('введите число a: ');   readln(a);   writeln('как заполнить массив? случайными числами (0) или с клавиатуры? (1)');   readln(choise);   if choise = 0 then     for var i : = 0 to valueofnumbers - 1 do       begin         var tmpnumber : = random(valueofnumbers + 1) + 1;         if tmpnumber < a then continue         else           begin             arr[i] : = tmpnumber;             inc(k);           end;       end   else     for var i : = 1 to valueofnumbers do       begin         var tmpnumber : = 1;         readln(tmpnumber);         if tmpnumber < a then continue         else         begin           arr[i] : = tmpnumber;           inc(k);         end;       end;   writeln('исходный массив: ');   for var i : = 1 to k do     if arr[i] = 0 then continue     else write(arr[i], ' ');   writeln('количество элементов массива: ', k); end.

График это наглядное представление процессов изменения величин.

Диаграмма - графическое изображение, дающее наглядное представление о соотношении нескольких величин или нескольких значений одной величины.

Объяснение: