Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 17.02.2013, 10:51   #1
димон4ик_
Пользователь
 
Регистрация: 04.10.2011
Сообщений: 29
Репутация: 10
По умолчанию Одномерные массивы

Выбрать алгоритм, составить его блок-схему и программу, в которой: предусмотреть ввод исходных данных a, b, n с клавиатуры;
димон4ик_ вне форума   Ответить с цитированием
Старый 17.02.2013, 11:12   #2
Stilet
Белик Виталий :)
Профессионал
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Адрес: Украина, Донецкая область, г. Краматорск
Сообщений: 57,840
Репутация: 6850
По умолчанию

Цитата:
Выбрать алгоритм
Алгоритм ввода данных с клавиатуры может быть только в единственном числе - Человек шлепает по клавишам. Там не из чего выбирать.
__________________
I'm learning to live...
Stilet вне форума   Ответить с цитированием
Старый 17.02.2013, 15:11   #3
димон4ик_
Пользователь
 
Регистрация: 04.10.2011
Сообщений: 29
Репутация: 10
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Алгоритм ввода данных с клавиатуры может быть только в единственном числе - Человек шлепает по клавишам. Там не из чего выбирать.
1 Выбрать алгоритм, составить его блок-схему и программу, в которой: предусмотреть ввод исходных данных a, b, n с клавиатуры;
2 Переписать отрицательные элементы массива X в массив Y и
подсчитать их количество. Элементы массива X вычисляются по формуле Xi = 3sqr (i -10) ×sin(i - 0,5), где i = 1, 2, …, 20.
димон4ик_ вне форума   Ответить с цитированием
Старый 18.02.2013, 20:20   #4
PavelDD
Пользователь
 
Регистрация: 15.02.2013
Адрес: Санкт-Петербург
Сообщений: 35
Репутация: 22
По умолчанию

Доброго времени суток.
Для того, чтобы все отрицательные элементы из массива X перетащить в массив Y
нужно всего лишь написать следующий цикл:
Код:
for i:=1 to n do
if x[i]<0 then y[i]:=x[i];
если нужно с клавиатуры прочитать, то:

Код:
readln(a,b,n);
PavelDD вне форума   Ответить с цитированием
Старый 19.02.2013, 22:00   #5
ViktorR
Профессионал
 
Регистрация: 23.10.2010
Сообщений: 1,354
Репутация: 644
По умолчанию

Код:
for i:=1 to n do
if x[i]<0 then y[i]:=x[i];
Не совсем так, ибо при перемешивании с положительными, часть элементов массива y будет не инициализирована.
Код:
k := 1;
for i := 1 to n do
   if x[i] < 0 then
   begin
      y[k] := x[i];
      ink(k);
   end;

Где-то так ...
ViktorR вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Одномерные массивы, двумерные массивы, строки Sand093 C++ Builder 11 20.05.2012 21:48
Даны одномерные массивы А и В. Сформировать массивы, состоящие из элемент LyaLya Помощь студентам 15 20.12.2009 15:12
Одномерные массивы в Си osichev Помощь студентам 20 02.06.2009 21:44
Одномерные массивы chistayastranichka Помощь студентам 2 29.05.2009 00:56
Одномерные массивы aiktz Помощь студентам 3 13.03.2009 17:49


04:10.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.