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

вектор

02.06.2010, 10:38. Просмотров 885. Ответов 1
Метки нет (Все метки)


1. дан вектор X[n]. Поменять местами максимальный и минимальный елемент
плиз надо срочно!!!
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.06.2010, 10:38
Ответы с готовыми решениями:

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

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

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

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

1
139 / 139 / 97
Регистрация: 25.01.2010
Сообщений: 181
02.06.2010, 12:54 2
Лучший ответ Сообщение было отмечено k1ller как решение

Решение

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
uses crt;
var x:array[1..10] of integer;
max,min,i,n,k,t,a:integer;
begin
clrscr;
randomize;
write('n = ');
readln(n);
for i:=1 to n do
begin
x[i]:=random(10);
end;
 for i:=1 to n do
 begin
 write(x[i]:3);
 end;
 writeln;
 max:=x[1];
 k:=1;
 for i:=1 to n do
 if x[i]>max then
  begin
   max:=x[i];
   k:=i;
   end;
   min:=x[1];
   t:=1;
   for i:=1 to n do
   if x[i]<min then
   begin
   min:=x[i];
   t:=i;
   end;
   a:=x[k];
   x[k]:=x[t];
   x[t]:=a;
   for i:=1 to n do
   write(x[i]:3);
   readln;
 end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.06.2010, 12:54

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

Заданы логический вектор a={a1,a2,...,An,} и вещественный вектор x={X1,X2,...,Xn}.
Заданы логический вектор a={a1,a2,...,An,} и вещественный вектор x={X1,X2,...,Xn}. Преобразовать...

Задан вектор C={Cn} Найти вектор y={Cn/|C|}
Напишите в Паскале плиз! Заранее спасибо! Задан вектор C={Cn} Найти вектор y={Cn/|C|}

Тип обьект "вектор" содержит поля: "вектор, егоразмер и идентификатор в символьном виде", методы:"введение вектора, выведение вектора,вычесление.
Тип обьект &quot;вектор&quot; содержит поля: &quot;вектор, его размер и идентификатор в символьном виде&quot;, ...

Вектор
В векторе Y(k) поменять местами первый и минимаиьный элементы


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

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

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