Страница 1 из 1
из числа взять цифры
Добавлено: 23.01.2008 18:58:49
maks
нада из числа выбрать все повторение например число 16771 и написать на экране 6 повторы 77 и 11 ненужны
9966 написать на экране 0
ришить без массивов
мне помогите и объясните но решение недовать пака я не придумают или срок некончится в воскрисение паследний день мне надо будет здовать
вот что я зделал
Код: Выделить всё
program m;
var a:longint;
function cislo(n:longint):longint;
begin
while n>0 do
begin
cislo:= n mod 10;{число разделяю на цифры}
n:=n div 10;
writeln(cislo);
end;
end;
begin
writeln('vvedite');
readln(a);
cislo(a);
readln;
end.
асталась мне эти цифры сравнить все со веми и записат ниповторяющийся цифры что подскажете
Модератор: следующие посты без форматирования буду удалять !
Добавлено: 24.01.2008 07:22:57
Brainenjii
Я бы TList'ом воспользовался, но подозреваю что нельзя ^_^
Добавлено: 24.01.2008 09:08:24
maks
да нилзя tlist я низнаю что это такое и в школе нилзя упатреблят что ище нипрохадили
Добавлено: 24.01.2008 09:24:06
DMA
Цифр всего 10. Заводим под каждую переменную-счетчик и считаем. Показываем те где счетчик=1.
Добавлено: 24.01.2008 11:07:04
Attid
а лучше массив, если прохдили =)
Добавлено: 24.01.2008 13:05:25
maks
массивы не проходили так как сделать я чегото не врубаюсь
Добавлено: 24.01.2008 14:27:19
Attid
заводишь 10 переменных типа интеджер
с1 с2 .. с0
обнуляешь их в 0
перебераешь полученное число
если там есть 2 то в с2 добавляешь 1
потом проверяешь все переменые и выводить только те которые равны 1
Добавлено: 24.01.2008 14:50:56
maks
ой я ище забил что мне нада функцию ln(c:longint):longint; и все в ней зделат
Добавлено: 24.01.2008 17:48:25
maks
так паможете или низнаете
Добавлено: 24.01.2008 18:05:34
DMA
нада из числа выбрать все повторение например число 16771 и написать на экране 6 повторы 77 и 11 ненужны
9966 написать на экране 0
A если 10771 и 9966 то 0 будет в обоих случаях. Как быть в таком примере?
Добавлено: 24.01.2008 19:02:05
maks
так и будит
Добавлено: 02.02.2008 13:29:10
AMD
Чтото немогу понять описание задачи
->смутно формулируешь задачи
maks писал(а): и написать на экране 6 повторы 77 и 11 ненужны
9966 написать на экране 0
Как понимать?
-> написать на экране 6
написать на экране цифру 6
написать на шестом экране
где запитая должна быть после 6 или после повторы?
->повторы 77 и 11 ненужны
как это понимать?
или ненужны 9966
Какафония слов - извените за выражение
опиши понятно и дай понятные примеры а потом проси решения задачи
обязательно поможем!!!
maks писал(а):так и будит
Ты случайно не двоичник?
правильно будет ->
так и будет
Добавлено: 02.02.2008 19:08:41
v-t-l
Если работу со строками проходили (copy(), pos()), то можно преобразовать число в строку и с ней работать, хотя по-моему значительную часть ты уже сделал.
AMD писал(а):где зап
итая должна быть после 6 или после повторы?
или не
_нужны 9966
Как
афония слов - изв
ените за выражение
maks писал(а):так и будит
Ты случайно не двоичник? 
правильно будет ->
так и будет
Он честно написал, что из Вильнюса.