Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 04.03.2012
Сообщений: 7
1

Задан вектор C={Cn} Найти вектор y={Cn/|C|}

06.03.2012, 00:46. Просмотров 980. Ответов 1
Метки нет (Все метки)


Напишите в Паскале плиз! Заранее спасибо!


Задан вектор C={Cn} Найти вектор y={Cn/|C|}
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.03.2012, 00:46
Ответы с готовыми решениями:

Задан вектор
Задан вектор Х(n), n<= 12. Сформировать вектор В из Xi, превышающих величину М=(minx + maxx)/2 ,...

Дана матрица A и вектор B порядка N. Поулчить вектор С, i-ый элемент которого..
Уважаемые форумчане) Помогите написать пожалуйста =) Дана матрица A и вектор B порядка N....

Дан вектро А, состоящий из N компонентов, и вектор В из М компонент.Построить новый вектор из M+N так:
Дан вектро А, состоящий из N компонентов, и вектор В из М компонент.Построить новый вектор из M+N...

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

__________________
Помогаю в написании курсовых работ и дипломов здесь.
1
Модератор
63229 / 46981 / 32383
Регистрация: 18.05.2008
Сообщений: 113,873
06.03.2012, 13:12 2
Лучший ответ Сообщение было отмечено Ekc3mm как решение

Решение

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
uses crt;
const nmax=100;
var c,y:array[1..nmax] of real;
    n,i:integer;
    d:real;
begin
clrscr;
randomize;
repeat
write('Размер массива до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Вектор С:');
for i:=1 to n do
 begin
  c[i]:=10*random;
  write(c[i]:5:2);
 end;
writeln;
d:=0;
for i:=1 to n do
d:=d+sqr(c[i]);
d:=sqrt(d);
writeln('Длина вектора С=',d:0:2);
writeln('Вектор C/|C]:');
for i:=1 to n do
 begin
  y[i]:=c[i]/d;
  write(y[i]:5:2);
 end;
readln
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.03.2012, 13:12

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

Процедуры и функции: получить вектор А * b (A - матрица, b - вектор)
Есть квадратная матрица A порядка n и вектор b с n элементами. Получить вектор А * b. Заранее...

Задан вещественный вектор х30. Подсчитать в нём число положительных элементов и провести сортировку по возрастанию
Помогите решить.Иначе экзамен не поставят( Задан вещественный вектор х30. Подсчитать в нём число...

Дан целочисленный вектор А(и). Найти наибольшее из нечетных чисел входящих в вектор. Определить его индекс и поменять
Помогите плиз Дан целочисленный вектор А(и). Найти наибольшее из нечетных чисел входящих в вектор....

Задан вектор T
Задан вектор T. Составьте программу, позволяющую вывести на экран только те его компоненты,...


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

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

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