В массиве из 6 случайных чисел (10;98] поменять местами минимальный и последний элементы массива. Напишите программу паскаль

program pr; vars,n: string; c: char; i: integer; beginwriteln('введите имя и фамилию в одной строке'); readln (s); i: =1; while s[i]< > ' ' do i: =i+1; n: =copy(s,1,i-1); writeln(n); readln; end.

64*48*12*8=294,912- обьем в байтах 1 стр

а)сумм(a5: b7)

б)срзнач(c4: c7)

6, понедельник, иа, 1, на печи,клюв, царь, марка, гласных 10, согласных 21, всего 33