Работа с массивом в Delphi

@Vatt · Регистрация: 07.05.2015

Author24 — интернет-сервис помощи студентам

Дан массив целых чисел из n элементов, заполненный случайным образом числами из промежутка [-40,30]. Вставить максимальный элемент массива после всех элементами, в которых есть цифра 1.

Вопрос: как определить, что в элементе есть цифра 1?

Пожалуйста, помогите! Заранее спасибо!

@Immo · 04.06.2015, 16:34

Delphi

1 2	for i:=0 to N do if pos('1',inttostr(x[i]))<>0 then есть

@Rasomaha · 04.06.2015, 16:36

Delphi

1	If Pos('1',IntToStr(Number))<>0 then {Число Number с цифрой 1};

@Vatt 0 / 0 / 0 Регистрация: 07.05.2015 Сообщений: 5
		1
	Работа с массивом в Delphi 04.06.2015, 16:29. Показов 1092. Ответов 2 Метки нет (Все метки) Дан массив целых чисел из n элементов, заполненный случайным образом числами из промежутка [-40,30]. Вставить максимальный элемент массива после всех элементами, в которых есть цифра 1. Вопрос: как определить, что в элементе есть цифра 1? Пожалуйста, помогите! Заранее спасибо! 0

	04.06.2015, 16:36

Работа с массивом в Delphi

Решение