Массивы. Опции

[alexy]

Люди, помогите с лабами времени в обрез!!!
1.Дана последовательность из 10 различных целых чисел.
Найти сумму чисел этой последовательности, расположенных между максимальным и минимальным числами (в сумму включить и оба этих числа)
2.Дана вещественная матрица размером NxM. Упорядочить ее строки и столбцы,  добиться того, чтобы наибольший элемент (один из них) оказался в верхнем левом углу.
3. Дан текст из 60 литер. Напечатать этот текст .подчеркивая (ставя минусы в соответствующих позициях следующей строки) все входящие в него цифры
4. Составить список студентов группы из N человек. Для каждого человека задавать имя, фамилию, год рождения. Написать процедуру изменения порядка элементов данного списка по алфавиту. И вставить алгоритм сортировки выбора.

[AlaRic]

Одну из 4 и так сделаем. Попробуй сам сделать..написать хоть какой-то код,а мы подправим если что, да и поймешь так лучше!
№2

Код

program matrix;
uses wincrt;
const n=3;m=3;
var a:array[1..n,1..n] of integer;
b,max:integer;
i,j:byte;
begin
writeln('ввести элементы');
for i:=1 to n do
for j:=1 to m do
read(a[i,j]);
max:=0;
for i:=1 to n do
for j:=1 to m do
if max<a[i,j] then max:=a[i,j];
a[1,1]:=max;
writeln(a[1,1]);
end.

Сообщение отредактировано: volvo - 17.12.2004 15:22

[AlaRic]

№1
Найдешь сначала номера элементов принимающих максимальное и минимальное значение. Потом сложишь все элементы, стоящие в этом интервале:
если max-элемент номер 2,а min-элемент номер 6 то:

Код

summa:=0;
for i:=2 to 6 do
summa:=summa+a[i];

и усе...

№4
Алгоритм сортировки выбора выслал на мыло!

Сообщение отредактировано: volvo - 17.12.2004 15:23

[Clane]

По 3-задаче могу сказать, что просто делаешь циклом скан всей строки, и если один из элементов строки принадлежит к множеству чисел, то заменяешь число на нужный знак (то есть -). Ссылка по теме : http://lessons.pascal.dax.ru/?lesson=18