Предмет: Информатика,
автор: Аноним
Составить программу , которая в Одномерном массиве размерностью 14 ( элементами являются случайные числа от 10 до 99) находит наименьший элемент оканчивающихся на 1.
Ответы
Автор ответа:
0
// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(14,10,99); a.Println;
var s:=a.Where(x->x mod 10=1);
if s.Count=0 then Writeln('Нет элементов, оканчивающихся на 1')
else Writeln('Наименьший элемент, оканчивающийся на 1: ',s.Min)
end.
Пример
34 32 61 31 56 42 23 89 10 25 59 15 60 73
Наименьший элемент, оканчивающийся на 1: 31
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(14,10,99); a.Println;
var s:=a.Where(x->x mod 10=1);
if s.Count=0 then Writeln('Нет элементов, оканчивающихся на 1')
else Writeln('Наименьший элемент, оканчивающийся на 1: ',s.Min)
end.
Пример
34 32 61 31 56 42 23 89 10 25 59 15 60 73
Наименьший элемент, оканчивающийся на 1: 31
Приложения:
Автор ответа:
0
Можешь сфотографировать,пожалуйста?а то ничего не понятно
Автор ответа:
0
Как может быть непонятен ТЕКСТ?
Похожие вопросы
Предмет: Українська мова,
автор: jybjilg
Предмет: История,
автор: kolcheva96
Предмет: История,
автор: warfacegame0609
Предмет: Математика,
автор: Аноним
Предмет: Геометрия,
автор: алекс230