Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.73/40: Рейтинг темы: голосов - 40, средняя оценка - 4.73
0 / 0 / 0
Регистрация: 26.11.2013
Сообщений: 4
1

Задана последовательность X = (x1, x2, …, x10). Сформировать из неё одномерный массив Y, состоящий из элементов, удовлетворяющих условию. КАК ?

24.01.2014, 18:53. Показов 7145. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Документ Microsoft Word 97-2003.doc
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
24.01.2014, 18:53
Ответы с готовыми решениями:

Задана целочисленная последовательность X=(x1,x2,….x10). Сформировать из неё одномерный массив Y, состоящий из нечётных
Задана целочисленная последовательность X=(x1,x2,….x10). Сформировать из неё одномерный массив Y, состоящий из нечётных элементов массива...

Задана целочисленная последовательность X=(x1, x2, …, x10). Сформировать из неё одномерный массив Y
решите пожалуйста все задачи

Сформировать из прсоедовательности одномерный массив, состоящий из элементов, удовлетворяющих условию
Задана последовательность X = (x1, x2, …, x10). Сформировать из неё одномерный массив Y, состоящий из элементов, удовлетворяющих условию...

1
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
24.01.2014, 19:19 2
Лучший ответ Сообщение было отмечено ARSLAN928 как решение

Решение

Delphi
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
program Project2;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
const n=10;
      x:array[1..n] of real=(5.2,-4.7,1,9.22,-8.3,-9.52,0.75,8.9,-4.2,1.3);
var y:array[1..n] of real;
    r:real;
    i,k:integer;
begin
writeln('Massiv X:');
r:=0;
for i:=1 to n do
 begin
  write(x[i]:6:2);
  r:=r+x[i]
 end;
writeln;
writeln('r=',r:0:2);
k:=0;
for i:=1 to n do
if abs(x[i])<=r then
 begin
  inc(k);
  y[k]:=x[i];
 end;
if k=0 then writeln('Iskomyh elementov net')
else
 begin
  writeln('Massiv Y:');
  for i:=1 to k do
  write(y[i]:6:2)
 end;
readln
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
24.01.2014, 19:19
Помогаю со студенческими работами здесь

Сформировать одномерный массив Y, состоящий из элементов, удовлетворяющих условию |Xi|<|Z|, где Z=X(5) + 0.5
как написать программу?может кто помочь? Задана последовательность X = (x1, x2, …, x10). Сформировать из неё одномерный массив Y,...

Задана последовательность,Сформировать из неё одномерный массив по определенному правилу.(фото внутри)
Заранее спасибо.:drink:

Сформировать массив Y из элементов массива X, удовлетворяющих данному условию
X = {- 8, 24, 6, 3; 7; 9; -14, 3, 12, -5; 0; -15; -9} условие | Xk | ≤10 и кратные трем сформировать массив Y из элементов массива X,...

Дан одномерный массив. Определить номера элементов массива,удовлетворяющих условию A<Y(I)<B
Дан одномерный массив. Определить номера элементов массива,удовлетворяющих условию A&lt;Y(I)&lt;B. помогите пожалуйста! Зарание спасибо!

Одномерный массив. Считать из файла, найти количество элементов, удовлетворяющих условию
Одномерный массив Х(15) считать из файла *.txt (файл создать самим). Найти: Количество элементов, удовлетворяющих условию...


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

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

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Новые блоги и статьи
Исследование байт-кода Python: подключаем дизассемблер
stackOverflow 19.02.2025
Многие знают, что Python - интерпретируемый язык, но мало кто задумывается о том, что происходит между написанием кода и его выполнением. На самом деле Python использует промежуточное представление. . .
Исследование байт-кода Python: компиляторы против интерпретаторов
stackOverflow 19.02.2025
Понимание байт-кода Python - основополагающий аспект для разработчиков, стремящихся глубже понять внутренние механизмы языка и оптимизировать производительность своих программ. Байт-код представляет. . .
Comprehensions в Python - что это такое?
stackOverflow 19.02.2025
Когда речь заходит о Python, одной из его самых красивых и мощных возможностей являются списковые включения или comprehensions. Это особые синтаксические конструкции, позволяющие создавать новые. . .
Python правда такой медленный? Развенчиваем миф о медлительности
stackOverflow 19.02.2025
Когда речь заходит о выборе языка программирования для нового проекта, вопрос производительности часто становится одним из ключевых факторов. Python, несмотря на свою популярность и простоту. . .
Динамические формы в Flask
stackOverflow 19.02.2025
Работа с веб-формами часто требует гибкости в отношении количества полей, которые пользователь может заполнить. Представьте ситуацию, когда вам нужно создать форму для ввода контактных данных, где у. . .
Обнаружение объектов в реальном времени на Raspberry Pi с OpenCV и Movidius NCS
stackOverflow 19.02.2025
Технология обнаружения объектов в реальном времени становится все более востребованной в различных областях - от систем безопасности до автономных транспортных средств. Особый интерес представляет. . .
где chromium хранит пароли и как их обнулить в пожарном варианте
jigi33 19.02.2025
Where is the chromium browser stores passwords for a sites где chromium-подобный браузер хранит пароли и как их обнулить в пожарном варианте (see screenshot)
howto get access to external internet resources with kinit
jigi33 19.02.2025
Решение проблемы с необходимостью доп. авторизации по Керберос для автоотработки аутентификации на прокси-сервер (see screenshot)
Отслеживание автомобилей и определение скорости с OpenCV и Python на Raspberry Pi
stackOverflow 19.02.2025
В этой статье мы рассмотрим создание системы отслеживания транспортных средств и определения их скорости с использованием компьютерного зрения и библиотеки OpenCV. Наше решение основано на принципе. . .
ENV (environments) valid paths in linux
jigi33 19.02.2025
Environments paths (see screenshot)
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru