Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.05.2011, 22:12   #1
Сашуня
 
Регистрация: 09.05.2011
Сообщений: 3
Вопрос заменить нулем все элементы меньшие введенного числа

Помогите пожалуйста решить задачу на одномерный массив.
В заданном массиве замените нулем все элементы меньшие числа введенного с клавиатуры.
Сашуня вне форума Ответить с цитированием
Старый 23.05.2011, 22:15   #2
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Код:
//заполнение массива
readln(a);
for i:=1 to n do //n — количество элементов в массиве mas[1..n]
   if (mas[i] < a) then mas[i] := 0;
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.

Последний раз редактировалось Alex11223; 23.05.2011 в 22:17.
Alex11223 вне форума Ответить с цитированием
Старый 23.05.2011, 22:18   #3
Сашуня
 
Регистрация: 09.05.2011
Сообщений: 3
По умолчанию

спасибо большое)
Сашуня вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Матрица целых чисел М(3,4). Все отрицательные элементы заменить их квадратами. (Basic) AnnKarpinskaya Помощь студентам 1 16.05.2011 14:51
Все элементы выше главной диагонали квадратной матрицы, заменить на минимальный элемент (VisualBasic) ride013 Помощь студентам 4 03.05.2011 20:40
Получить все меньшие натуральные числа, квадрат суммы цифр которых равен m (C) VIKA1829 Помощь студентам 0 05.04.2011 19:59
Все отрицательные элементы массива А заменить на сумму, а положительные на полусумму предшествующих Lada05 Помощь студентам 1 27.10.2010 15:44
вводим два числа, получить все меньшие n натуральные числа, квадрат суммы цифр которых равен m Sparky Помощь студентам 2 22.11.2009 21:59