Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

1. Даны два одномерных массива разной размерности. Для каждого из заданных одномерных массивов выполнить: последовательно переписать в другой массив

5-9 класс

отрицательные элементы начального массива.
с применение подпрограмм и процедур желательно

маис2003 12 дек. 2014 г., 11:22:20 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Saharok112
12 дек. 2014 г., 13:15:49 (9 лет назад)

const
  nn = 20;

type
  ta = array[1..nn] of integer;

procedure FillArray(var a: ta; n, min, max: integer);
var
  i, k: integer;
begin
  k := max - min + 1;
  for i := 1 to n do a[i] := Random(k) + min
end;

procedure WriteArray(a: ta; n, p: integer);
var
  i: integer;
begin
  for i := 1 to n do Write(a[i]:p);
  Writeln
end;

procedure CopyNegative(var a, b: ta; m: integer; var n: integer);
var
  i: integer;
begin
  n := 0;
  for i := 1 to m do
    if a[i] < 0 then
    begin
      Inc(n);
      b[n] := a[i]
    end
end;

var
  n: integer;
  x, y: ta;

begin
  Randomize;
  FillArray(x, 10, -50, 50);
  Writeln('Исходный массив');
  WriteArray(x, 10, 4);
  CopyNegative(x, y, 10, n);
  Writeln('Массив из отрицательных элементов');
  WriteArray(y, n, 4);
  FillArray(x, 8, -200, 100);
  Writeln('Исходный массив');
  WriteArray(x, 12, 5);
  CopyNegative(x, y, 12, n);
  Writeln('Массив из отрицательных элементов');
  WriteArray(y, n, 5);
end.

Тестовое решение:
Исходный массив
 -12  17  35  -4 -45   8  33  -8 -47  -4
Массив из отрицательных элементов
 -12  -4 -45  -8 -47  -4
Исходный массив
 -150 -174   92 -168   69  -60 -165  -78  -47   -4    0    0
Массив из отрицательных элементов
 -150 -174 -168  -60 -165  -78  -47   -4


Ответить

Другие вопросы из категории

Автомат получает на вход четырёхзначное десятичное число. По полученному числу строится новое дестичное число по следующим правилам.

1. Вычисляются два числа - сумма первой и второй цифр и сумма третьей и четвертой цифр заданного числа.
2. Полученные два числа записываютс друг за другом в порядке неубывания (без разделителей)
Определите, сколько из приведенных ниже чиел может получиться в результате работы автомата
1915 20 101 1213 1312 312 1519 112 1212

Читайте также

Помогите срочно решить!

1) Городская метеостанция фиксирует температуру воздуха каждые три часа. В июле колебания температуры были в интервале от 0 до 30. Специальное устройство записывает температуру в двоичном виде с использованием минимально возможного количества бит. Каков информационный объем всех данных, записанных устройством в июле?
2) Текстовый документ, состоящий из 11264 символов, хранился в 8-битной кодировке КОИ-8. Этот документ был преобразован в 16-битную кодировку Unicode. Укажите, какое дополнительное количество Кбайт потребуется для хранения документа? В ответе запишите только число.
3) Дано а=A316, b=3018. Определите число с, записанное в двоичной системе, которое отвечает условию a 4) Для каждого из перечисленных ниже десятичных чисел построили двоичную запись. Укажите число, двоичная запись которого содержит наибольшее количество единиц: 15 14 13 16
5) Производилась двухканальная (стерео) звукозапись с частотой дискретизации 16 кГц и 24-битнным разрешением. В результате был получен файл размером 60 Мбайт, сжатие данных не производилось. Какая из приведенных ниже величин наиболее близка к времени, в течение которого проводилась запись?
6) Для кодирования некоторой последовательности, состоящей из букв А, Б, В, Г и Д, решили использовать неравномерный двоичный код, позволяющий однозначно декодировать двоичную последовательность, появляющуюся на приемной стороне канала связи. Для букв А, Б, В и Г использовали такие кодовые слова: А – 000, Б – 001, В – 010, Г – 011. Укажите, каким кодовым словом может быть закодирована буква Д.
Код должен удовлетворять свойству однозначного декодирования. Если можно использовать более одного кодового слова, укажите кратчайшее из них.

7) Автомат получает на вход четырехзначное десятичное число. По этому числу строится новое число по следующим правилам:
1. Складываются первая и вторая, а также третья и четвертая цифры.
2. Полученные два числа записываются друг за другом в порядке убывания (без разделителей).
Пример. Исходное число: 5487. Суммы: 5+4=9; 8+7=15. Результат:159.
Определите, какое из предложенных чисел может быть результатом работы автомата.
8)Азбука Морзе позволяет кодировать символы для сообщений по радиосвязи, задавая комбинации точек и тире. Сколько различных символов можно закодировать, используя код Азбуки Морзе длиной не менее двух и не более пяти сигналов (точек и тире)?
9) Десятичное число 59 в некоторой системе счисления записывается как 214. Определите основание системы счисления.
10) при регистрации в компьютерной системе каждому пользователю выдается пароль, состоящий из 11 символов и содержащий только символы И, К, Л, М, Н. Каждый такой пароль в компьютерной программе записывается минимально возможным и одинаковым целым количеством байт (при этом используют посимвольное кодирование и все символы кодируются одинаковым и минимально возможным количеством бит).
Определите объем памяти, отводимой этой программой для записи 20 паролей.

Написать эфыективную с точки зрения распределения памяти и скорости работы программу для решения задачи:

Известен рост каждого из N- гвардейцев кардинала (представлен в линейной таблице) выведите на экран рост двух самых высоких . (все гвардейцы имеют разный рост)
Входные данные : N<50(количество гвардейцев), рост каждого из гвардейцев
Выходные данные: рост 2-x самых высоких


Входные данные
N=5
187
178
175
191
189
Выходные Данные:
191
189

1. Определите тип выравнивания для каждого из приведённых ниже фрагментов:

Фрагмент 1
Для представления текстовой информации в компьютере используется алфавит мощностью 256 символов. Двоичный код каждого символа в ком-пьютерном тексте занимает 1 байт памяти.

Фрагмент 2
Таблица кодировки – это таблица, в которой всем символам компьютер-ного алфавита поставлены в соответствие порядковые номера и их двоичные коды.

Фрагмент 3
Все символы кодировочной таблицы пронумерованы от 0 до 255. Каждому номеру соответствует двоичный код от 000000000 до 111111111. Для разных типов ЭВМ существуют разные таблицы кодировки. Для компьютеров типа IBM PC международным стандартом стала кодировочная таблица ASCII (American Standart Code for Information Interchange).

Фрагмент 4
Первая половина этой таблицы имеет международный стандарт (символы от 0 до 127), вторая половина называется кодовой страницей и существует в различных вариантах

Фрагмент 1 -
Фрагмент 2 -
Фрагмент 3 -
Фрагмент 4 -

1. Определите тип выравнивания для каждого из приведённых ниже фрагментов:

Фрагмент 1
Для представления текстовой информации в компьютере используется алфавит мощностью 256 символов. Двоичный код каждого символа в ком-пьютерном тексте занимает 1 байт памяти.

Фрагмент 2
Таблица кодировки – это таблица, в которой всем символам компьютер-ного алфавита поставлены в соответствие порядковые номера и их двоичные коды.

Фрагмент 3
Все символы кодировочной таблицы пронумерованы от 0 до 255. Каждому номеру соответствует двоичный код от 000000000 до 111111111. Для разных типов ЭВМ существуют разные таблицы кодировки. Для компьютеров типа IBM PC международным стандартом стала кодировочная таблица ASCII (American Standart Code for Information Interchange).

Фрагмент 4
Первая половина этой таблицы имеет международный стандарт (символы от 0 до 127), вторая половина называется кодовой страницей и существует в различных вариантах



Вы находитесь на странице вопроса "1. Даны два одномерных массива разной размерности. Для каждого из заданных одномерных массивов выполнить: последовательно переписать в другой массив", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.