Перестановка элементов массива местами - Turbo Pascal

Формулировка задачи:

1.Сделать задания с использованиям процедур та функции 2. данные ввести из текстового файлу 3.матрицу и результат вывести в другой текстовый файл та на екран основной программе 4.Все данные передать в подпрограмму с помощью списка формальных/фактичных предметов. В массиве A={a1},i=1,n элемент аk вставить на место аm,а элемент с-го по аk-1 Дано:А=(1.1,2.5,3.4,-0.8,4.5),n=6,k=4,m=1.

Решение задачи: «Перестановка элементов массива местами»

textual
                            Листинг программы 
                        

                            uses crt;
const
m=2;
n=4;
var
a:array [1..n,1..m] of integer;
 
f:text;
 
begin
 
  assign(f, 'f.txt');
  reset(f);
 readln(f);
      writeln;
 
  Close(f);
    
end.
                        

Оцени полезность:

9 голосов , оценка 3.889 из 5

Похожие ответы