Помогите решить задачки Турбо Паскаль

Танечка92 · 27.05.2010, 15:01

Составить программу, реализующую алгоритмы обработки одномерных массивов
1)Дан массив Х={Xi} i=1,15. Определить номер максимального элемента среди тех элементов массива значени которых находятся в интервале
[2;10]
Составить программу, реализующую алгоритмы обработки всех элементов матрицы
2)Дана матрица A={aij} 5на5 вычислить сумму элементов стоящих ниже главной диагонали, и произведение ненулевых элементов, стоящих выше главной диагонали
Составить программу,реализующую алгоритм поиска минимального максимального элемента матрицы
3)Дана матрица A={aij}4 на5 найти максимальный элемент среди тех элементов матрицы, которые удовлетворяют неравенству |Aij|>2,5
Составить программу реализующую алгоритмы обработки внутри строки(или столбца) матрицы
4)Дана матрица A={aij}5на7 найти в каждом столбце матрицы количесто элементов удовлетворяюших условию |Aij|>3,2

Огромное спасибо

Qiker · 29.05.2010, 12:13

№1

Код:

program hh;
uses crt;
var  a:array [1..15] of integer;
     k,max,i:integer;
begin
For i := 1 to 15 do begin
a[i]:=random(20);
write(a[i],' ');
end;
writeln;
write('======');
writeln;
for k:=2 to 10 do begin

write(a[k], ' ');
end;
max:=2;
 for k:=2 to 10 do begin
  if a[k]>a[max] then
   max:=k;
   end;

   writeln('номер максимального элемента массива=' ,max);
end.

---------- Добавлено в 11:13 ---------- Предыдущее сообщение было написано в 11:11 ----------

ЗЫ
Танечка92, не понял условия №1:

Цитата:

Сообщение от Танечка92

среди тех элементов массива значени которых находятся в интервале
[2;10]

если этот интервал относится к i,то тогда решение правильное

Танечка92 · 01.06.2010, 17:22

Можете еще парочку решить! Заранее спасибо

27.05.2010, 15:01	#1 (ссылка)
Танечка92 Новичок Регистрация: 27.05.2010 Сообщений: 2 Репутация: 0	Помогите решить задачки Турбо Паскаль Составить программу, реализующую алгоритмы обработки одномерных массивов 1)Дан массив Х={Xi} i=1,15. Определить номер максимального элемента среди тех элементов массива значени которых находятся в интервале [2;10] Составить программу, реализующую алгоритмы обработки всех элементов матрицы 2)Дана матрица A={aij} 5на5 вычислить сумму элементов стоящих ниже главной диагонали, и произведение ненулевых элементов, стоящих выше главной диагонали Составить программу,реализующую алгоритм поиска минимального максимального элемента матрицы 3)Дана матрица A={aij}4 на5 найти максимальный элемент среди тех элементов матрицы, которые удовлетворяют неравенству \|Aij\|>2,5 Составить программу реализующую алгоритмы обработки внутри строки(или столбца) матрицы 4)Дана матрица A={aij}5на7 найти в каждом столбце матрицы количесто элементов удовлетворяюших условию \|Aij\|>3,2 Огромное спасибо

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Помогите с задачей на рекурсию! Паскаль.	Svetlanka_1	Программирование	0	20.11.2010 15:51
Помогите решить проблему	Серрега	Операционные системы	3	31.10.2010 11:39
Задачки на паскале	Mitti	Программирование	0	11.10.2010 13:53
Помогите решить проблему	DEVOLIK	Windows XP	6	22.09.2010 13:31
Помогите решить задачки Паскаль	sanyacech	Программирование	4	30.05.2010 13:55
опера турбо не работает	mariina	Интернет и сети	0	17.05.2010 19:59
Помогите решить проблему	Urokl	Безопасность	3	16.05.2010 15:06
Программы, написанные на турбо паскале	Qiker	Программы	0	12.04.2010 16:26
Рисование в Турбо Паскале (нужна помощь!).	OrtodokS	Программирование	0	08.12.2009 15:31
Турбо режим...	telo909	Разгон и моддинг	15	04.12.2009 14:19
помогите решить проблему.	but	Windows XP	15	17.09.2009 19:12
RDP в VPN... Помогите решить!	sersaz	Интернет и сети	0	29.08.2008 09:27

01.06.2010, 17:22	#3 (ссылка)
Танечка92 Новичок Регистрация: 27.05.2010 Сообщений: 2 Репутация: 0	Можете еще парочку решить! Заранее спасибо

Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)

Ads