Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
skrimmi
0 / 0 / 0
Регистрация: 03.03.2010
Сообщений: 8
1

на формирование массива

17.03.2010, 16:22. Просмотров 1039. Ответов 1
Метки нет (Все метки)

Даны два целочисленных массива с положительными элементами: X1,X2,...,Xn и Y1,Y2,..Yn.Если все элементы массива X меньше всех элементов массива Y с соответствующими индексами,сформировать массив Z1,Z2,..Zn по правилу: (Zi!)/(Xi!(Yi-Xi)!)

ребят не могу решить ее,что то в ней меня смущает,но я так и не поняла что..помогите,если сможете, контрольная неделя..завтра сдать ее надо,буду вам очень благодарна..
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.03.2010, 16:22
Ответы с готовыми решениями:

Двуменые Массивы.Формирование одномерного массива из двумерного массива по условию
1)В двумерном массиве B найти минимальный элемент среди элементов,расположенных...

Формирование массива
Дан массив целых чисел, в котором могут встречаться повторяющиеся элементы....

Формирование массива
Дан массив целых чисел, в котором могут встречаться повторяющиеся элементы....

Формирование массива
Даны массивы X(8),Y(8),Z(10),W(15) элементы которых определяются за формулами (...

Формирование массива
Помогите составить программу: Сформировать элементы массива А(5*5) по формуле ...

1
*~<`PIK`>~*
ﻌﺹ ﺦ ﺖﻀ ﺹ ﻙ ﺵﻔ ﺊ ﺘﺝ
606 / 386 / 81
Регистрация: 15.12.2009
Сообщений: 753
17.03.2010, 17:13 2
Лучший ответ Сообщение было отмечено skrimmi как решение

Решение

Цитата Сообщение от skrimmi Посмотреть сообщение
сформировать массив Z1,Z2,..Zn по правилу: (Zi!)/(Xi!(Yi-Xi)!)
или что-то в условии не то или я не пойму чего-то.
Цитата Сообщение от skrimmi Посмотреть сообщение
(Zi!)/(Xi!(Yi-Xi)!)
Zi=0 и по этому тут (Zi!)/(Xi!(Yi-Xi)!) получится 0.

Добавлено через 12 минут
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
uses
  SysUtils;
  var i:integer;
      b:boolean;
      X:array[1..10] of integer;
      Y:array[1..10] of integer;
      Z:array[1..10] of integer;
begin
b:=True;
Randomize;
For i:=1 to 10 do
x[i]:=Random(10);//формирование массива X рендомными числами от 0 до 9
 
For i:=1 to 10 do
y[i]:=Random(30)+10;//формирование массива Y рендомными числами от 10 до 39
 
Write('MaccuB X=');//вывод массива X на экран
Writeln;
For i:=1 to 10 do
begin
Write(x[i]);
Write(' ');
end;
Writeln;
Writeln;
 
Write('MaccuB Y=');//вывод массива Y на экран
Writeln;
For i:=1 to 10 do
begin
Write(y[i]);
Write(' ');
end;
 
Writeln;
Writeln;
 
For i:=1 to 10 do
If x[i]>=y[i] then//проверка правда ли что все числа массива X больше 
begin                 //соответствующих чисел в массиве Y
b:=False;
Break;
end;
 
If b=True then//если правда то формируем массив Z
begin
For i:=1 to 10 do
z[i]:=x[i]*(y[i]-x[i]);//вот здесь формируется массив Z
end;
   If b=True then//если правда то выводим массив Z на экран
   begin
   Write('MaccuB Z=');
   Writeln;
   For i:=1 to 10 do
   begin
   Write(z[i]);
   Write(' ');
   end;
   end
   else//если неправда то пишем что это неправда
   begin
   Writeln;
   Write('HekoTopbIe 4ucJla MaccuBa X 6oJlbWe 4eM B MaccuBe Y.');
   Writeln;
   end;
   Readln;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.03.2010, 17:13

Формирование массива по правилу
нужно 1) сформирования массива Х По закону : x=a; x=a+dx;...

Формирование нового массива из старого
Из элементов массива С сформировать массив А той же размерности по правилу:...

Формирование векторов из двумерного массива
Сформировать, четыре вектора из двумерного массива.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru