Сформировать новый массив В, состоящий из положительных элементов массива А

@mb871 · Регистрация: 23.08.2017

Студворк — интернет-сервис помощи студентам

Задача простая, но в силу своей неопытности решить её не получается. HELP!
Массив А вводится с клавиатуры. Сформировать новый массив В, состоящий из положительных элементов массива А. Размер произвольный.

@Puporev · 26.08.2017, 13:20

Сообщение от mb871

но в силу своей неопытности решить её не получается.

Покажите свой код.

@mb871 · 26.08.2017, 13:30 **[ТС]**

Дело в том, что кода то и нет, мне бы просто понять КАК это делается, может там какая то специальная функция, или какой то особый алгоритм. Я могу сюда скинуть основу (begin, var, ввод массива, который нужно перенести в другой) Надо?

@Puporev · 26.08.2017, 13:44

Нет там никакой функции.
Вводите размер массива А и его элементы, положительные и отрицательные числа.
Затем создаете массив В.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
k:=0;
for i:=1 to n do
if a[i]>0 then
 begin
  k:=k+1;
  b[k]:=a[i];
 end;
if k=0 then write('В массиве А нет положительных элементов')
else
 begin
  writeln('Массив В');
  for i:=1 to k do
  write(b[i],' ');
 end;

@Comrade2017 · 29.08.2017, 09:04

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program  gg;
 uses crt;
 var
 n,i:integer;
 a,b:array[1..100]of integer;
 begin
  n:=0;
  for i:= 1 to 10 do
    if  a[i]>0 then
      begin
        n:=n+1;
        b[n]:=a[i];
      end;
   for i:= 1 to n do
    write(b[i]);
 end.

@Joy · 30.08.2017, 06:37

Сообщение от Comrade2017

array[1..100]of integer;

написано же

Сообщение от mb871

Размер произвольный.

Добавлено через 1 минуту

Сообщение от mb871

Массив А вводится с клавиатуры.

Сообщение от Comrade2017

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
program  gg;
 uses crt;
 var
 n,i:integer;
 a,b:array[1..100]of integer;
 begin
  n:=0;
  for i:= 1 to 10 do
    if  a[i]>0 then
      begin
        n:=n+1;
        b[n]:=a[i];
      end;
   for i:= 1 to n do
    write(b[i]);
 end.

и где тут ввод с клавиатуры? и почему цикл только до 10?

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .

@mb871 5 / 3 / 2 Регистрация: 23.08.2017 Сообщений: 17

	Сформировать новый массив В, состоящий из положительных элементов массива А 26.08.2017, 13:15. Показов 39856. Ответов 5 Метки нет (Все метки) Задача простая, но в силу своей неопытности решить её не получается. HELP! Массив А вводится с клавиатуры. Сформировать новый массив В, состоящий из положительных элементов массива А. Размер произвольный. 0

@mb871 5 / 3 / 2 Регистрация: 23.08.2017 Сообщений: 17
	26.08.2017, 13:30 [ТС]
	Дело в том, что кода то и нет, мне бы просто понять КАК это делается, может там какая то специальная функция, или какой то особый алгоритм. Я могу сюда скинуть основу (begin, var, ввод массива, который нужно перенести в другой) Надо? 0

Сформировать новый массив В, состоящий из положительных элементов массива А

Решение