Написать код

@Wuldi · Регистрация: 15.05.2018

Помогите , нужно написать программу в результате выполнения которой , будет выясняться , входит ли цифра 7 в состав трехзначного целого числа n

@D1973 · 15.05.2018, 11:53

Delphi

1 2	//n - Ваше трехзначное число if Pos('7', IntToStr(n)) > 0 then ShowMessage('Входит') else ShowMessage('Не входит');

@krapotkin · 15.05.2018, 14:12

Delphi

1	if Pos('777', IntToStr(n)) > 0 then ShowMessage('Входит и выходит. Азино три топора');

))))

@D1973 · 15.05.2018, 14:41

Не по теме:

Сообщение от krapotkin

if Pos('777', IntToStr(n))...

BINGO!!! :yahoo:

@Wuldi 0 / 0 / 0 Регистрация: 15.05.2018 Сообщений: 1
		1
	RAD 2006-2007 Написать код 15.05.2018, 09:57. Показов 409. Ответов 3 Метки нет (Все метки) Помогите , нужно написать программу в результате выполнения которой , будет выясняться , входит ли цифра 7 в состав трехзначного целого числа n 0

@D1973
	15.05.2018, 14:41 RAD 2006-2007 Написать код #4
	Не по теме: Сообщение от krapotkin if Pos('777', IntToStr(n))... BINGO!!! :yahoo: 0