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

[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 11:22