В массиве из N элементов найти наименьший среди элементов кратных 3, расположенных до первого отрицательного

@The_Hardwell · Регистрация: 04.11.2015

В заданном массиве размером N , который образуется из случайных чисел, нужно:

В заданном массиве из N элементов найти наименьший среди элементов кратных трем, расположенных до первого отрицательного.

@volvo · 04.11.2015, 20:57

Pascal

uses Arrays;
const n = 20;
begin
  var a : array of integer := CreateRandomIntegerArray(n, -5, 20);
  a.Writeln(' ');
  write('результат = ', a.TakeWhile(x -> x > 0).Where(x -> x mod 3 = 0).DefaultIfEmpty(-1).Min());
end.

(если нет элементов, кратных трем, до первого отрицательного - выведется -1)

@The_Hardwell 0 / 0 / 0 Регистрация: 04.11.2015 Сообщений: 10
		1
	В массиве из N элементов найти наименьший среди элементов кратных 3, расположенных до первого отрицательного 04.11.2015, 18:57. Показов 1182. Ответов 1 Метки нет (Все метки) В заданном массиве размером N , который образуется из случайных чисел, нужно: В заданном массиве из N элементов найти наименьший среди элементов кратных трем, расположенных до первого отрицательного. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

В массиве из N элементов найти наименьший среди элементов кратных 3, расположенных до первого отрицательного

Решение