Алг
Нач
	цел п, р, мин, и
	ввод р
	мин := 0
	нц для и от 1 до р
		ввод п
		если (mod(п, 10) = 4)) и (п < мин) то
			мин := п
		все
	все
	вывод мин
Кон