kak rospechatat 1.000.000 raz "WELCOME IMHO" ne ispolzya kakoi to vid loopa

[catcanon]

kak rospechatat 1.000.000 raz "WELCOME IMHO" ne ispolzya kakoi to vid loopa

[ЕЖ]

А что ты имеешь ввиду под слово "вид" цикла. Можно например с помощью рекурсии, если конечно не считать это "видом" цикла.

[crawler]

Это не в "программирование" а в "флейм". На чем распечатать, каким языком пользоваться? Возьми напиши от руки на листе, положи на копир и настучи 1.000.000 на количестве копий.

[catcanon]

recursia это один подход, я его тоже придумал, надо не рекусрия и без for, goto, do-while, while etc.

[Lord Skill]

рекурсию не ты придумал!
начем напечатать? на принтере? в файл?

[Madness]

Примерно так:

count dd 0
text db "WELCOME IMHO",0

begin:
          cld
          mov ecx, end-begin
          mov edi, offset end
          mov esi, offset begin
          rep movsb
          inc [count]
          invoke SendDlgItemMessage, hwnddlg, ID_LISTBOX, LB_ADDSTRING, 0, offset text
          cmp eax, 1000000
          jne end
          ret
end:

dup db 1000000*(end-begin) (?)

[catcanon]

to Lord-Skill - ne vazno na chem napechatat!
to Maddness - obasni chto tam napisano, ya xot i znal assembler no yze ne pomny 6 let nem ne pisal

[Madness]

catcanon
1) копируется тело программы сразу после себя;
2) увеличиваем счетчик;
3) печать;
4) проверка на миллионную запись;
5) выполнение скопированного кода.
Типа цикл развернулся.

[catcanon]

Madness
ето же наподобе цикла

[ЕЖ]

catcanon
Чего ж ты хочешь? Не "на подобии цикла" может быть только тупой копи-паст милион раз строки вывода нужной тебе надписи.

[Lord Skill]

ИМХО, кроми copy/paste нет другового варианта, все будет цыклом

[catcanon]

ест есчо один способ. я его уже нашел, но предлагаю вам подумать. подсказка-прога займет ~20 строчек

етот вопрос у меня был на приеме на роботу. меня не взали . но все вопросы были на етом построени. фирма в израиле

[Madness]

catcanon
Это не цикл :P
Если убрать ограничение на 1000000, то ни одного условного/безусловного перехода не будет, можно и проверку без сравнения сделать, но только
мастера дзена постигли данное шаманство, я к сожалению пока в астрал выхода не имею :(

>прога займет ~20 строчек
строчек чего? lol

[catcanon]

Madness
ничего не понал что ти написал?

тут никакого цикла нету! 1.000.000 ето не усливие!

ето подсказка номер 2

[Ghost]

catcanon
Получается: как распечатать 1000000 раз "привет имхо" не используя какой-то вид цикла, но "1000000 раз" не является условием, или, другими словами, печатайте сколько влезет, хоть 1 раз, но без циклов! Ты можешь четко сформулировать вопрос?

З.Ы. Чуть не забыл: вся эта байда должна обязательно занимать 20 строчек неизвестно чего и неизвестно каких...

[catcanon]

Ghost
все началос с того что надо розпечатат 1.000.000 не исползыя цикл. первуй вариант рекурсия а второй???

я уже нашол вариант. и занимает всего ~20 строчек кода.

[Ghost]

catcanon
Эээ, батенька... Так что Вам нужно распечатать? 1.000.000 или "привет имхо" такое количество раз? Имхо, алгоритм с повторяющимися действиями можно реализовать либо рекурсией, либо циклом (базовых алгоритмических конструкций, видишь ли, всего три: линейная, разветвляющаяся и циклическая).

З.Ы. Мляяя... 20 строчек кода какого? На асме, паскале, прологе, в машинных кодах? Или, быть может, в заклинаниях?

[catcanon]

Ghost
если бы ето было так легкро, я бы вас не спрашивал?

[Madness]

catcanon
Сформулируй ЧЕТКО и ПОНЯТНО свой вопрос или я сочту это все за флуд.

[catcanon]

Очень быстро: 2^20 = 1048576
Поправка, если учитывать разложение 1000000 = 11110100001001000000
то получится следующий код из ~20 строк
Delphi:
N>var
N> s: string;
N>begin
N> s := 'Welcome'#10;
N> s := s + s;
N> s := s + s;
N> s := s + s;
N> s := s + s;
N> s := s + s;
N> s := s + s; write(s);
N> s := s + s;
N> s := s + s;
N> s := s + s; write(s);
N> s := s + s;
N> s := s + s;
N> s := s + s;
N> s := s + s;
N> s := s + s; write(s);
N> s := s + s;
N> s := s + s; write(s);
N> s := s + s; write(s);
N> s := s + s; write(s);
N> s := s + s; write(s);
N>end.
N>

В итоге ровно 1000000 строк Welcome

все просто гениално.
если человек не понимает то лучше сказат мне ето не нравитса.