![]() |
#1 (permalink) | ||
Новичок
Регистрация: 15.12.2015
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
![]() и найти порядковый номер минимального элемента в массиве Y. Эле- менты массива X вычисляются по формуле 7 3, 3 Xi = i - i - где i = 1, 2, …, 10.
|
||
![]() |
![]() |
![]() |
|
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Наверняка в этих обсуждениях люди уже написали много дельного Задача на массивы Задача на Паскале Массивы VB. Задача на массивы Задача на массивы Паскаль ABC Задача на массивы Builder C++ Задача на массивы в Паскале |
![]() |
#3 (permalink) |
Новичок
Регистрация: 15.12.2015
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
![]()
i
20. Переписать элементы массива X в массив Y в обратном порядке и найти порядковый номер минимального элемента в массиве Y. Эле- менты массива X вычисляются по формуле X = i3 − 7i − 3, где i = 1, i 2, ..., 10. |
![]() |
![]() |
![]() |
#4 (permalink) | |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,809
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
![]()
Ох, сударь − достали!
Вообще-то мы здесь не любим "помогать" (извините) лоботрясам, которые не то, что не в состоянии решить глупейшую школьную задачку, а даже не могут толком изложить условие. Вот что это такое: Цитата:
Следует ли это понимать, как (i³ − i*7 − 3)? Хоть бы словами описали задание... хотя да, понимаю: пальчики отвалятся. Ладно, если я правильно понял формулу, то − пожалуйста: Код:
Var X,Y:Array[1..10] of Integer; i,Imin:Integer; Begin Writeln('Array X:'); for i:=1 to 10 do begin X[i]:=i*i*i-i*7-3; write(X[i]:4); end; Writeln; Writeln; Imin:=1; Writeln('Array Y:'); for i:=1 to 10 do begin Y[i]:=X[10-i+1]; if Y[i]<Y[Imin] then Imin:=i; write(Y[i]:4); end; Writeln; Writeln; Writeln('Number of minimal element in Y array is ',Imin); Readln End. |
|
![]() |
![]() |
![]() |
#5 (permalink) |
Новичок
Регистрация: 15.12.2015
Сообщений: 7
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
![]()
спасибо большое
![]() |
![]() |
![]() |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
![]() |
Опции темы | |
Опции просмотра | |
|
|