Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
NaV
0 / 0 / 0
Регистрация: 07.01.2011
Сообщений: 53
1

Получить новый массив B, каждый элемент которого вычисляется по формуле bi=cosai+cosai2+cosai3+…+cosain

24.02.2011, 22:08. Просмотров 709. Ответов 3
Метки нет (Все метки)

1.Дан одномерный массив A размера n (n<=30). Получить новый массив B, каждый элемент которого вычисляется по формуле bi=cosai+cosai2+cosai3+…+cosain .

2.Дана квадратная матрица B размера 10x10. Преобразовать её к такому виду, чтобы на побочной диагонали стояли максимальные элементы всех строк. Использовать процедуру для поиска максимального элемента строки и перестановки ее с диагональным в этой строке.

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.02.2011, 22:08
Ответы с готовыми решениями:

Построить массив С, каждый элемент которого вычисляется по формуле
даныодномерные массивы А, В с 10 чисел. построить массив С каждый елемент этого масива решается по...

Массив: Создать вектор, каждый элемент которого вычисляется по заданной формуле...
Мне нужно помочь с этим, я должен вводить числа и мне результат должно выдавать как то Элемент...

Получить в результате умножения исходной матрицы А(6,7) на вектор-столбец В(7) вектор С(6), каждый элемент которого вычисляется по формуле
Помогите сделать еще одну прогу!!! - Дана действительная матрица А(6,7) и вектор-столбец В(7)....

Дана матирца А(4,6). Получить матрицу В(4,6), каждый элемент которой вычисляется по формуле
Дана целочисленная матрица А(4,6). Получить матрицу B(4,6), каждый элемент которой вычисляется по...

Построить массив, каждый элемент которого вычисляется по правилу
Задали одномерный массив А из 10 чисел. Построить массив В, каждый элемент которого вычисляется: bi...

3
Puporev
Модератор
57141 / 43617 / 30147
Регистрация: 18.05.2008
Сообщений: 103,994
25.02.2011, 10:07 2
Цитата Сообщение от NaV Посмотреть сообщение
bi=cosai+cosai2+cosai3+…+cosain .
Здесь степени что ли? Типа
bi=(cos(a[i])^1)+(cos(a[i])^2+(cos(a[i])^3+…+(cos(a[i])^n
или как-то по другому?

Добавлено через 16 минут
2.

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
uses crt;
const nmax=20;
type mas=array[1..nmax] of integer;{1 строка матрицы}
     matr=array[1..nmax] of mas;{массив строк}
procedure Obmen(var m:mas;n,k:byte);{процедура обмена}
var j,jmx:byte;
    x:integer;
begin
jmx:=1;
for j:=1 to n do
if m[j]>m[jmx] then jmx:=j;
x:=m[k];
m[k]:=m[jmx];
m[jmx]:=x;
end;
 
var a:matr;
    n,i,j:byte;
begin
clrscr;
randomize;
repeat
write('Размер матрицы до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=random(50);
    write(a[i,j]:4);
   end;
  writeln;
 end;
writeln;
for i:=1 to n do{по количеству строк вызываем процедуру}
Obmen(a[i],n,i);
writeln('Обменм максимальных в строках с диагональными:');
for i:=1 to n do
 begin
  for j:=1 to n do
  write(a[i,j]:4);
  writeln;
 end;
readln
end.
0
NaV
0 / 0 / 0
Регистрация: 07.01.2011
Сообщений: 53
25.02.2011, 12:05  [ТС] 3
да сдесь степени а(итое)^2 .... извените за непонятнось
0
Puporev
Модератор
57141 / 43617 / 30147
Регистрация: 18.05.2008
Сообщений: 103,994
25.02.2011, 13:47 4
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
uses crt;
const nmax=100;
var a,b:array[1..nmax] of real;
    n,i,j:byte;
    x:real;
begin
clrscr;
randomize;
repeat
write('Размер массива до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=10*random;
  write(a[i]:6:2);
 end;
writeln;
writeln;
writeln('Новый массив:');
for i:=1 to n do
 begin
  b[i]:=1;
  for j:=1 to i do
  b[i]:=b[i]*cos(a[i]);
  write(b[i]:6:2);
 end;
readln
end.
1
25.02.2011, 13:47
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
25.02.2011, 13:47

Создать массив, каждый элемент которого рассчитывается по формуле
Создать массив, каждый элемент которого рассчитывается по формуле: I^2-I, где I – индекс элемента...

Массив: Получить из исходного вектора новый, элементы которого вычисляются по формуле S(i)= i*(-i - 4)*sin(i)
Дан вектор S размера n, где n&lt;=15. Элементы вектора вычисляются по формуле S(i)= i*(-i - 4)*sin(i)....

Дан одномерный массив, получить другой массив той же размерности, каждый элемент которого b[i]=a[1]+.+a[i]
Дан одномерный массив, получить другой массив той же размерности, каждый элемент которого равен...


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

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

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