0 / 0 / 0
Регистрация: 22.12.2011
Сообщений: 44
1

Сформировать вектор Х, где х1 совпадает с первой ненулевой компонентой вектора Y(y1,y2,...,ym) при просмотре его компонентой слева направо

30.12.2011, 00:09. Показов 1346. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
составить программу для формирования вектора Х(х1,х2,...,хn), где х1 совпадает с первой ненулевой компонентой вектора Y(y1,y2,...,ym) при просмотре его компонентой слева направо,х2-со следующей ненулевой компонентой и т.д.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.12.2011, 00:09
Ответы с готовыми решениями:

Вычислить произведение тех компонент вектора, которые стоят перед первой отрицательной компонентой
Дан вектор В вещественных чисел. Вычислить произведение тех компонент этого вектора, которые стоят...

Является ли последовательность его цифр при просмотре их слева направо упорядоченной по возрастанию
Помогите разобраться с кодом, буквально построчно, буду очень благодарен. Задание: Дано...

Удалить пробелы из исходной строки при просмотре ее слева направо
Помогите, пожалуйста, написать программу формирования сжатой строки символов с помощью...

Установить, является ли последновательность при просмотре слева направо упорядоченной
Здравствуйте, форумчане.Есть одно условие задачи и есть решение. Вот условие:дано натуральное...

2
--\.founder./--
565 / 565 / 392
Регистрация: 20.10.2011
Сообщений: 867
31.12.2011, 11:37 2
Лучший ответ Сообщение было отмечено Natacha как решение

Решение

Цитата Сообщение от Natacha Посмотреть сообщение
составить программу для формирования вектора Х(х1,х2,...,хn), где х1 совпадает с первой ненулевой компонентой вектора Y(y1,y2,...,ym) при просмотре его компонентой слева направо,х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
 Uses crt;
  
 var x,y : array [1..100] of integer;
 i,j,n,m : integer;
  
 begin
 randomize;
 Write('Введите размер вектора Y - '); readln(m);
 Writeln('Вектор Y: ');
 For i:=1 to m do
     begin
     Y[i]:=random(9);
     Write(Y[i],' ');
     If Y[i]<>0 then
        begin
        inc(n);
        X[n]:=Y[i];
        end;
     end;
 Writeln;
 Writeln('Сформированный вектор X: ');
 For i:=1 to n do
     write(X[i],' ');
 end.
1
0 / 0 / 0
Регистрация: 22.12.2011
Сообщений: 44
31.12.2011, 18:10  [ТС] 3
спасибо большое)))
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
31.12.2011, 18:10
Помогаю со студенческими работами здесь

Вычислить разность между первой и последней компонентой файла
Создайте файл f, компоненты которого являются действительными числами. Напишите программу...

Установить, является ли последовательность цифр при просмотре их слева направо упорядоченной по возрастанию
Есть ли у кого-то готовое решение ? Заранее спасибо. Дано натуральное число. Установить,...

Является ли последовательность цифр числа при просмотре их слева направо упорядоченной по возрастанию
Дано натуральное число. Установить, является ли последовательность его цифр при просмотре их слева...

Напишите программу вычисления разности между первой компонентой файла f и последней
ПРОШУ ПОМОЩИ. Создайте файл f, компоненты которого являются действительными числами. Напишите...

Возвести в квадрат все компоненты ряда, следующие за первой отрицательной компонентой
Как решать следующую задачу в Windows Forms? В) Дан одномерный ряд на 15 элементов. Возвести в...

Создать файл, где компонентой будет матрица
В данной лабораторной работе необходимо сделать типизированный файл, где каждой компонентой будет...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru