Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/4: Рейтинг темы: голосов - 4, средняя оценка - 5.00
4 / 4 / 0
Регистрация: 24.09.2020
Сообщений: 419

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

19.11.2020, 12:21. Показов 791. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Массив А вводится с клавиатуры. Сформировать новый массив В,
состоящий из положительных элементов массива А и найти в нем
наибольший элемент. Размер произвольный.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
19.11.2020, 12:21
Ответы с готовыми решениями:

Массив А вводится с клавиатуры. Сформировать новый массив В, состоящий из положительных элементов массива А
const N = 10; var a: array of integer; b: array of integer; i: byte; begin randomize; for i:=1 to N do begin a :=...

Сформировать новый массив В, состоящий из положительных элементов массива А
Помогите с задачкой (1) 1.Массив А вводится с клавиатуры. Сформировать новый массив В, состоящий из положительных элементов массива А....

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

2
Эксперт Pascal/Delphi
2388 / 1300 / 1492
Регистрация: 29.08.2014
Сообщений: 4,665
21.11.2020, 04:30
Цитата Сообщение от amd5500 Посмотреть сообщение
Размер произвольный.
размер оригинального массива как узнать - вводится сначала количеств элементов или какое условие на ограничение ввода?
0
 Аватар для Sun Serega
2355 / 1458 / 526
Регистрация: 07.04.2017
Сообщений: 4,798
21.11.2020, 10:49
Pascal
1
2
3
4
## var N := ReadInteger;
var A := ReadArrInteger(N);
var B := A.Where(x->x>0).ToArray;
B.Println;
Или, если не так принципиально какие типы у A и B, лишь бы вывод был правильный:
Pascal
1
2
3
4
5
6
## var N := ReadInteger;
var A := ReadArrInteger(N);
 
var B := A.ToList;
B.RemoveAll(x->x<=0);
B.Println;
(так эффективнее)

Или последовательностями:
Pascal
1
2
3
## ReadArrInteger(ReadInteger)
.Where(x->x>0)
.Println;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
21.11.2020, 10:49
Помогаю со студенческими работами здесь

Сформировать новый массив Zk, состоящий из первых пяти положительных элементов массива Xn
Даны два одномерных массива Xn и Ym. Сформировать новый массив Zk, состоящий из первых пяти положительных элементов массива Xn и последних...

Сформировать массив B, состоящий из положительных элементов массива A, и найти в нём наибольший элемент
Дан массив из A из n целых чисел,сформировать массив B состоящий из положительных элементов массива A.Найти в массиве B наибольший элемент.

Сформировать массив В состоящий из положительных элементов массива А
Здравствуйте, ассемблер интегрированный в lazarus . Код паскаля сделал сам, а в ассемблере полный 0. Нужно сформировать массив В...

Сформировать новый массив B ,состоящий из нечетных элементов массива
Дан массив A из N целых чисел.Сформировать новый массив B ,состоящий из нечетных элементов массива A .Затем вывести массив B и количество...

Сформировать новый массив В, состоящий из четных элементов массива А
Массив А вводится с клавиатуры. Сформировать новый массив В, состоящий из четных элементов массива А. Элементы вводятся с клавиатуры....


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Киев стоит - украинская песня
zorxor 28.01.2026
wfWdiRqdTxc О Господи, Вечный, Ты . . . Я помоги, Бесконечный. . . Я прошу Ты. . . Я погибаю, спаси. . . Я прошу Тебя Вечный. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru