Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.04.2016, 21:10   #1
Бугра
Новичок
Джуниор
 
Регистрация: 04.04.2016
Сообщений: 8
Восклицание Важно:Одномерный массив. Работа с элементами.

Составить процедуру (или функцию), которая меняет порядок элементов массива,
стоящих на четных местах, на обратный. Например, для исходного массива 1,2,3,4,5,6
результатом является 1,6,3,4,5,2.
Следующие действия должны выполняться отдельными процедурами (и/или функциями): 1) заполнение массива случайными числами из заданного интервала; 2)вывод массива на экран; 3) заполнение массива нулями (инициализация); 4) сохранение
массива в текстовый файл; 5) чтение массива из текстового файла; 6) удаление нескольких элементов из указанного места (со сдвигом);
7) добавление нескольких элементов в указанное место (со сдвигом). Процедуры (и/или функции) должны работать
с массивами как с параметрами, но не как с глобальными переменными.
Бугра вне форума Ответить с цитированием
Старый 05.04.2016, 22:05   #2
dimon_snake
Форумчанин
 
Регистрация: 05.11.2015
Сообщений: 167
По умолчанию

Вот первые три.
Код:
const n=10;
type
mass=array[1..n]of integer;
procedure Zapolnenie(var a:mass;n:integer);
var
i:integer;
begin
Randomize;
for i:=1 to n do a[i]:=Random(10)+1;
end;
procedure Vivod(a:mass;n:integer);
var i:integer;
begin
for i:=1 to n do Writeln(a[i]);
end;
procedure FulZero(var a:mass;n:integer);
var i:integer;
begin
for i:=1 to n do a[i]:=0;
end;
var
i:integer;
mas:mass;
begin
Zapolnenie(mas,n);
vivod(mas,n);
FulZero(mas,n);
Vivod(mas,n);
Readln;
end.
И т.д. и в том же духе.
dimon_snake вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сформировать одномерный массив, элементами которого являются все отрицательные элементы двумерного массива, после 1-го полож-го sev48fire Фриланс 5 23.06.2012 19:07
Сформировать одномерный массив, элементами которого являются все положительные элементы исходного массива... sev48fire Помощь студентам 11 07.06.2012 11:06
Одномерный массив. Работа с элементами. сергей1893 Паскаль, Turbo Pascal, PascalABC.NET 3 21.03.2012 17:38
задача на одномерный массив с элементами метода слияния kunshui Помощь студентам 0 08.12.2011 14:15
одномерный массив,с элементами двухмерного ммассива dark064 Паскаль, Turbo Pascal, PascalABC.NET 6 28.12.2008 18:37