Простая задача - Помощь студентам

utyyf · 18.10.2007, 09:56

Помогите, злой препод совсем замучал Паскалем:

Требуется в заданном трехзначном числе переставить цифры так, чтобы получилось максимально возможное. Никаких "если - то" использовать нельзя (линейный алгоритм должен быть)!

kommunist · 18.10.2007, 10:51

а циклы можно?

utyyf · 18.10.2007, 10:54

Не!
Мы только начали изучать.
Изменение значений переменных, стандартные функции (корень, деление нацело, остатки, модули) - больше ничего не проходили.

xTANATOSx · 18.10.2007, 11:34

через String можно?

utyyf · 18.10.2007, 11:37

Не, еще не изучали! Мы только Integer и real прошли.

mutabor · 18.10.2007, 11:40

разложить число на цифры можно так:
дано трехзначное число N
n1 := N div 100;
n2 := (N mod 100) div 10;
n3 := N mod 10;
а вот что с ними дальше делать, было бы самому интересно узнать,
тут наверняка математика замешана и скорее всего не нужно даже это разложение

Stilet · 18.10.2007, 11:48

потом
z:=n1*n2*n3;
n1:=z div n1;
n2:=z div n2;
n3:=z div n3;
result:=n1*100+n2*10+n3

utyyf · 18.10.2007, 11:49

Разложение наверное нужно. А дальше что делать?

utyyf · 18.10.2007, 11:53

Цитата:

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

потом
z:=n1*n2*n3;
n1:=z div n1;
n2:=z div n2;
n3:=z div n3;
result:=n1*100+n2*10+n3

попробовал разложить, а потом сделать то, что выше - ничего путного не получилось!

Stilet · 18.10.2007, 11:56

Угу, эт я преждевременно )

18.10.2007, 09:56	#1
utyyf Пользователь Регистрация: 18.10.2007 Сообщений: 21	Простая задача Помогите, злой препод совсем замучал Паскалем: Требуется в заданном трехзначном числе переставить цифры так, чтобы получилось максимально возможное. Никаких "если - то" использовать нельзя (линейный алгоритм должен быть)!

18.10.2007, 10:51	#2
kommunist C# developer Форумчанин Регистрация: 03.10.2007 Сообщений: 393	а циклы можно? I like WPF

18.10.2007, 11:40	#6
mutabor Телепат с дипломом Старожил Регистрация: 10.06.2007 Сообщений: 4,929	разложить число на цифры можно так: дано трехзначное число N n1 := N div 100; n2 := (N mod 100) div 10; n3 := N mod 10; а вот что с ними дальше делать, было бы самому интересно узнать, тут наверняка математика замешана и скорее всего не нужно даже это разложение The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen) Проверь себя! Онлайн тестирование \| Мой блог

18.10.2007, 11:48	#7
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	потом z:=n1n2n3; n1:=z div n1; n2:=z div n2; n3:=z div n3; result:=n1100+n210+n3 I'm learning to live...

18.10.2007, 11:56	#10
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Угу, эт я преждевременно ) I'm learning to live...

18.10.2007, 10:54	#3
utyyf Пользователь Регистрация: 18.10.2007 Сообщений: 21	Не! Мы только начали изучать. Изменение значений переменных, стандартные функции (корень, деление нацело, остатки, модули) - больше ничего не проходили.

18.10.2007, 11:34	#4
xTANATOSx Подтвердите свой е-майл Регистрация: 15.07.2007 Сообщений: 72	через String можно?

18.10.2007, 11:37	#5
utyyf Пользователь Регистрация: 18.10.2007 Сообщений: 21	Не, еще не изучали! Мы только Integer и real прошли.

18.10.2007, 11:49	#8
utyyf Пользователь Регистрация: 18.10.2007 Сообщений: 21	Разложение наверное нужно. А дальше что делать?

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Не простая задача !!!	MaxZoa	Microsoft Office Excel	2	06.03.2008 18:07
простая задача по строковым переменным	STEEL-F	Помощь студентам	6	21.01.2008 22:32
Простая и в то же время сложная задача	fiveelement	Microsoft Office Excel	1	28.10.2007 21:03
Простая задача еще	utyyf	Помощь студентам	28	23.10.2007 00:07