Geek
5 год назад
Дан массив целых чисел из 18 элементов,заполненный случайным образом числами из промежутка [-40;80].Вывести на экран все элементы,которые состоят из одинаковых цифр.
ОТВЕТЫ
Schubert Anna
Oct 24, 2020
begin
var a:=ArrRandom(18,-40,80); a.Println;
a.Where(t->(t mod 10)=(t div 10)).Println
end.
34 -22 11 63 -9 43 34 -32 -34 -32 28 17 50 37 80 49 2 29
-22 11
85
Смежные вопросы:
