Люди, помогите с лабами времени в обрез!!!
1.Дана последовательность из 10 различных целых чисел.
Найти сумму чисел этой последовательности, расположенных между максимальным и минимальным числами (в сумму включить и оба этих числа)
2.Дана вещественная матрица размером NxM. Упорядочить ее строки и столбцы, добиться того, чтобы наибольший элемент (один из них) оказался в верхнем левом углу.
3. Дан текст из 60 литер. Напечатать этот текст .подчеркивая (ставя минусы в соответствующих позициях следующей строки) все входящие в него цифры
4. Составить список студентов группы из N человек. Для каждого человека задавать имя, фамилию, год рождения. Написать процедуру изменения порядка элементов данного списка по алфавиту. И вставить алгоритм сортировки выбора.
Полная версия: Массивы.
Одну из 4 и так сделаем. Попробуй сам сделать..написать хоть какой-то код,а мы подправим если что, да и поймешь так лучше!
№2
№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.
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.
№1
Найдешь сначала номера элементов принимающих максимальное и минимальное значение. Потом сложишь все элементы, стоящие в этом интервале:
если max-элемент номер 2,а min-элемент номер 6 то:
и усе...
№4
Алгоритм сортировки выбора выслал на мыло!
Найдешь сначала номера элементов принимающих максимальное и минимальное значение. Потом сложишь все элементы, стоящие в этом интервале:
если max-элемент номер 2,а min-элемент номер 6 то:
Код
summa:=0;
for i:=2 to 6 do
summa:=summa+a[i];
for i:=2 to 6 do
summa:=summa+a[i];
и усе...
№4
Алгоритм сортировки выбора выслал на мыло!
По 3-задаче могу сказать, что просто делаешь циклом скан всей строки, и если один из элементов строки принадлежит к множеству чисел, то заменяешь число на нужный знак (то есть -). Ссылка по теме : http://lessons.pascal.dax.ru/?lesson=18
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.