Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.01;
Скачать: CL | DM;

Вниз

Вывести числа от 1 до 100 без циклов и условий   Найти похожие ветки 

 
Kerk ©   (2005-12-05 02:08) [0]

Сабж. Такая вот задачка.


 
Kerk ©   (2005-12-05 02:09) [1]

Будем считать что

> Вывести числа от 1 до N без циклов и условий

для ясности


 
Джо ©   (2005-12-05 02:17) [2]

WriteLn (1);
WriteLn (2);
WriteLn (3);
...
WriteLn (100);

В чем прикол-то?


 
Kerk ©   (2005-12-05 02:20) [3]

Джо ©   (05.12.05 2:17) [2]

См [1].
Количество чисел до запуска программы не известно.


 
Джо ©   (2005-12-05 02:28) [4]


>  [3] Kerk ©   (05.12.05 02:20)
> Количество чисел до запуска программы не известно.

Не видел [1], когда писал.

Все равно не понимаю. Где-то ведь эти числа хранятся? От того, где и как хранятся эти N чисел и зависит, как их выводить. Нужно, имхо, строже задачу описать, а то непонятно, в чем соль. Мне, по крайней мере. Что значит N чисел? Каких чисел? И откуда их брать?


 
Kerk ©   (2005-12-05 02:31) [5]

Джо ©   (05.12.05 2:28) [4]
От того, где и как хранятся эти N чисел и зависит, как их выводить.


Нигде не хранятся. Они должны генерировать по ходу выполнения программы. Числа от 1 до N выводить, скажем, в консоль по типу того, как у тебя в [2].


 
Джо ©   (2005-12-05 02:32) [6]

Или как раз и нужно придумать такой способ хранения, чтобы обойтись при выводе без и циклов и сравнений? Тогда и
S := "сюда пишем числа, разделенные концом каретки и возвратом строки";
WriteLn (S);
подходит... Или я невероятно туп?


 
Джо ©   (2005-12-05 02:33) [7]


>  [6] Джо ©   (05.12.05 02:32)

Тю, опять поспешил, не видел [5], сорри. Теперь, кажется, понял :)


 
Джо ©   (2005-12-05 02:36) [8]

Рекурсия подходит?


 
Kerk ©   (2005-12-05 02:37) [9]

Джо ©   (05.12.05 2:36) [8]
Рекурсия подходит?


Подходит все что угодно, что ты сможешь сделать без циклов и условий.


 
Джо ©   (2005-12-05 03:07) [10]

Сорри за еще один тупой вопрос, но спрошу: блок case считается за сравнение? Подозреваю, что да, но все-же.


 
Джо ©   (2005-12-05 03:11) [11]

Что-то DMClient заглючил и не показывает (у меня) мой последний пост, продублирую:
Сорри за еще один тупой вопрос, но спрошу: блок case считается за сравнение? Подозреваю, что да, но все-же.


 
Kerk ©   (2005-12-05 03:11) [12]

Джо ©   (05.12.05 3:07) [10]
блок case считается за сравнение?


Ну конечно. Тот же самый условный переход.


 
Profi ©   (2005-12-05 03:20) [13]

Вроде задача не решаема. Если только как-то исхитриться с рекурсией + метки. Еще подумаю.


 
Джо ©   (2005-12-05 03:31) [14]


program Project1;

{$APPTYPE CONSOLE}

uses
 SysUtils;

var
 MaxN: Integer;

procedure NextN (N: Integer);
var
 Dummy: Double;
begin
 Dummy := 1 / (N-MaxN-1);
 WriteLn (N);
 Inc (N);
 NextN (N);
end;

begin
 ReadLn (MaxN);
 try
   NextN(1);
 except
 end;
 ReadLn;
end.


Ни одного цикла и сравнения, всё тип-топ ;->
П.С. Отключить оптимизацию.


 
Profi ©   (2005-12-05 03:35) [15]

Джо ©   (05.12.05 3:31) [14]
Блин, опередил, я только Delphi запустил, хотел проверить. Правда, я try думал в функции использовать. Сейчас свой вариант приведу.


 
Profi ©   (2005-12-05 03:48) [16]

Джо ©   (05.12.05 3:31) [14]
Ага, с оптимизацией не катит!

Код:

program Project1;

{$APPTYPE CONSOLE}

uses
 SysUtils;

var
 S,N:Integer;

Procedure Wr(S:integer);
var
 i:extended;
begin
 Try
   i:=1/(N-S);
   writeln(S);
   inc(S);
   Wr(S);
 Except
   exit;
 end;
end;

begin
 write("Введите N ");
 readln(N);
 Wr(0);
 readln;
end.


 
Profi ©   (2005-12-05 03:49) [17]

Profi ©   (05.12.05 3:48) [16]
Немного переделал:

program Project1;

{$APPTYPE CONSOLE}

uses
 SysUtils;

var
 S,N:Integer;

Procedure Wr(S:integer);
var
 i:extended;
begin
 Try
   inc(S);
   writeln(S);
   i:=1/(N-S);
   Wr(S);
 Except
   exit;
 end;
end;

begin
 write("Введите N ");
 readln(N);
 Wr(-1);
 readln;
end.


 
Джо ©   (2005-12-05 04:03) [18]


> [17] Profi ©   (05.12.05 03:49)

У меня код короче :p


 
Lamer@fools.ua ©   (2005-12-05 08:14) [19]

>>Джо ©   (05.12.05 03:31) [14]

>П.С. Отключить оптимизацию.
Эх. Учи, учи, одни двойки :o)

program Project1;

{$APPTYPE CONSOLE}

uses
 SysUtils;

var
MaxN: Integer;

function NextN(N: Integer): Double;
var
 Dummy: Double;
begin
 Result := 1 / (N - MaxN - 1);
 WriteLn(N);
 NextN(N + 1);
end;

begin
 ReadLn(MaxN);
 try
   NextN(1);
 except
 end;
 ReadLn;
end.


 
Гость1   (2005-12-05 10:31) [20]

try
except

по большому счету тот же условный переход, только завуалированный :)

можно и без него обойтись :)

type
 TMyEvent = procedure (n, maxn: integer) of object;

 TForm1 = class(TForm)
   Button1: TButton;
   Edit1: TEdit;
   ListBox1: TListBox;
   procedure Button1Click(Sender: TObject);
 private
   { Private declarations }
 public
   { Public declarations }
   fEvents: array [boolean] of TMyEvent;
   procedure NextN(n, maxn: integer);
   procedure StopN(n, maxn: integer);

 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}
{ TForm1 }

procedure TForm1.NextN(n, maxn: integer);
begin
 ListBox1.Items.Add(IntToSTr(n));
 fEvents[n=maxn](n+1, maxn);
end;

procedure TForm1.StopN(n, maxn: integer);
begin
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
 ListBox1.Clear;
 fEvents[true]:=StopN;
 fEvents[false]:=NextN;
 NextN(0, StrToInt(Edit1.Text));
end;

но здесь, конечно, тоже "мухлеж"
условный переход замаскирован под обращение  к элементу массива :)

А так, задача решения не имеет.


 
Anatoly Podgoretsky ©   (2005-12-05 10:34) [21]

Рекурсия это тоже цикл - рекурсивный цикл


 
Sandman29 ©   (2005-12-05 10:37) [22]

А так, задача решения не имеет.

Имеет. Выводим все числа в вечной рекурсии начиная с 1.
То, что программа не должна выводить N+1, не написано. То, что программа не должа вылетать по переполнению стека или числа, тоже не написано :)


 
Труп Васи Доброго ©   (2005-12-05 10:58) [23]

Sandman29 ©   (05.12.05 10:37) [22]
Выводим все числа в вечной рекурсии начиная с 1.

Тогда уж проще некуда, и без всякой рекурсии, GOTO рулит!


 
Гость1   (2005-12-05 11:02) [24]


> Труп Васи Доброго ©   (05.12.05 10:58) [23]

GOTO - типа цикл :)


 
umbra ©   (2005-12-05 11:04) [25]

2 Гость1   (05.12.05 11:02) [24]

GOTO - не цикл, а безусловный переход. Циклы и условные переходы сего помощью организуются.


 
КаПиБаРа ©   (2005-12-05 11:15) [26]

// Извеняюсь за свой ассемблер, последний раз писал больше 10 лет назад и
// то под Z80

program Project2;

{$APPTYPE CONSOLE}

uses
 SysUtils;

var
 N, MaxN, c, m: Longword;

 procedure SetLabel; // Корявенькая процедура определения текущего местоположения в памяти
 begin
 asm
   pop EDX;          // Загружаем в адрес процедуы вывода числа
   push EDX;         // По адресу ECX-4 ,будет расположен указатель на точку выхода
   push EDX;         // По адресу ECX-8 ,будет расположен указатель на процедуру вывода числа
   push EDX;         // Адресс возврата из подпрограммы
   add EDX, $20;     // Задаем адресс точки выхода
   mov [ESP+8], EDX; // Заносим его в стек
 end;
 end;

 procedure Output;   // Процедура вывода числа
 begin
   writeln(MaxN-N+1);
   dec(N);
   c := 2 * N div (N + 1); // Возвращает 0 если N = 0 или 1 если N > 0;
                             // Если 0 - заканчиваем расчет
                             // Если 1 - продолжаем;
   c := (c + 1) * 4;       // Определяем смещение для точки перехода
 end;

begin
 ReadLN(MaxN);
 N := MaxN;

 // Определяем местоположение программы в памяти и точки перехода
 asm
   Push EDX
   Push ECX;          // Освобождаем регистр
   mov ECX, ESP;      // Запоминаем в него адрес вершины стека;
   call SetLabel;     // Задаем метки
   push ECX;          // Сохраняем региистр, что бы не затерся во время вывода
 end;

 // Выводим число
 Output;

 // Определяем точку перехода
 asm
   pop ECX;           // Загружаем регистр
   push EAX;          // Сохраняем регистры для операций по вычислению адреса перехода
   push EBX;
   mov EAX, c;
   mov EBX, ECX;
   sub EBX, EAX;
   mov EDX, [EBX];
   pop EBX            // Загружаем регистры
   pop EAX;
   jmp EDX;
   nop;   // В этом районе находится точка выхода (лень точно вычислять)
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   nop;
   pop ECX; // Освобождаем память от переменной в которой хранили адресс перехода
   pop ECX; // Освобождаем память от переменной в которой хранили адресс перехода
   pop ECX;
   pop EDX;
 end;
 ReadLN

end.


 
КаПиБаРа ©   (2005-12-05 11:20) [27]

Практически то же что и в Гость1   (05.12.05 10:31) [20]


 
Kerk ©   (2005-12-05 11:59) [28]

Гость1   (05.12.05 10:31) [20]

Я почти также решил :)


 
Владислав ©   (2005-12-05 17:12) [29]

unit Unit2;

interface

uses
 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
 Dialogs, StdCtrls;

type
 TForm1 = class(TForm)
   Edit1: TEdit;
   Button1: TButton;
   Memo1: TMemo;
   procedure Button1Click(Sender: TObject);
 private
   procedure OutputAll(Count: Integer);
   procedure Output(Number: Integer);
   { Private declarations }
 public
   { Public declarations }
 end;

var
 Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Output(Number: Integer);
begin
 Memo1.Lines.Add(IntToStr(Number));
end;

procedure TForm1.OutputAll(Count: Integer);
asm
   PUSH  EBX
   PUSH  EBP
   MOV   EBP, ESP
   LEA   ECX, @@done
   PUSH  ECX
   LEA   ECX, @@output
   PUSH  ECX
   MOV   ECX, EDX
@@output:
   PUSH  EAX
   PUSH  EDX
   PUSH  ECX
   SUB   EDX, ECX
   ADD   EDX, 1
   CALL  TForm1.Output
   POP   ECX
   POP   EDX
   POP   EAX
   SUB   ECX, 1

   TEST  ECX, ECX
   PUSHF
   POP   BX
   AND   EBX, $40
   SHR   EBX, $04
   LEA   EBX, [EBP + EBX - $08]
   JMP   [EBX]
@@done:
   POP   ECX
   POP   ECX
   POP   EBP
   POP   EBX
end;

procedure TForm1.Button1Click(Sender: TObject);
var
 Count: Integer;
begin
 Count := StrToIntDef(Edit1.Text, 3);
 OutputAll(Count);
end;

end.


 
VirEx ©   (2005-12-05 17:40) [30]

! TEST  ECX, ECX


 
Владислав ©   (2005-12-05 17:47) [31]


> VirEx ©   (05.12.05 17:40) [30]
> ! TEST  ECX, ECX


:)

procedure TForm1.OutputAll(Count: Integer);
asm
   PUSH  EBX
   PUSH  EBP
   MOV   EBP, ESP
   LEA   ECX, @@done
   PUSH  ECX
   LEA   ECX, @@output
   PUSH  ECX
   MOV   ECX, EDX
@@output:
   PUSH  EAX
   PUSH  EDX
   PUSH  ECX
   SUB   EDX, ECX
   ADD   EDX, 1
   CALL  TForm1.Output
   POP   ECX
   POP   EDX
   POP   EAX
   SUB   ECX, 1

   MOV   EBX, ECX
   AND   EBX, EBX

   PUSHF
   POP   BX
   AND   EBX, $40
   SHR   EBX, $04
   LEA   EBX, [EBP + EBX - $08]
   JMP   [EBX]
@@done:
   POP   ECX
   POP   ECX
   POP   EBP
   POP   EBX
end;


 
Метроном   (2005-12-05 17:49) [32]

procedure TForm1.Button1Click(Sender: TObject);
begin
 Timer1.Tag := StrToInt(Edit1.Text);
 Timer1.Enabled := True;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
 Timer1.Tag := Timer1.Tag-1;
 Memo1.Lines.Add(IntToStr(StrToInt(Edit1.Text)- Timer1.Tag));
 Timer1.Enabled := Boolean(Timer1.Tag);
end;


 
Владислав ©   (2005-12-05 18:17) [33]

Немного поупражнялся :)

procedure TForm1.OutputAll(Count: Integer);
asm
   PUSH  EBP
   MOV   EBP, ESP
   PUSH  OFFSET @@done
   PUSH  OFFSET @@output
   PUSH  EAX
   PUSH  EDX
   ADD   EDX, 1
   PUSH  EDX
@@output:
   SUB   EDX, [EBP - $10]
   CALL  TForm1.Output

   SUB   [EBP - $10], 1

   MOV   EAX, [EBP - $0C]
   MOV   EDX, [EBP - $14]

   PUSHF
   POP   CX
   AND   ECX, $40
   SHR   ECX, $04
   JMP   [EBP + ECX - $08]
@@done:
   ADD   ESP, $14
   POP   EBP
end;


 
VirEx ©   (2005-12-05 18:41) [34]


> Метроном   (05.12.05 17:49) [32]

негодится - условие от "1 до ...", но "финт ушами" удался :) (хотя всёже проблема решена на техническом уровне но не на логическом, т.е. не все языки это переварят)


> Владислав ©   (05.12.05 18:17) [33]

аналогично (в смысле решения задачи) :) всякие "хитрые" сдвиги, умножения и переходы по фикс. адресу


 
Метроном   (2005-12-05 19:07) [35]


> негодится - условие от "1 до ...", но "финт ушами" удался
> :) (хотя всёже проблема решена на техническом уровне но
> не на логическом, т.е. не все языки это переварят)


А ты попробуй. Выводятся числа именно от 1 до ...


 
VirEx ©   (2005-12-05 19:20) [36]


> Метроном   (05.12.05 19:07) [35]


> А ты попробуй. Выводятся числа именно от 1 до ...

а ну да тыже тэг уменьшаешь а результат как разница... ай эм сорри :)


 
Verg ©   (2005-12-05 20:30) [37]


> Гость1   (05.12.05 11:02) [24]


Вызов процедуры - разновидность "goto", значит вызов процедуры тоже цикл?
см. [21]


 
Gero ©   (2005-12-05 22:29) [38]


procedure WriteFrom1ToN(N: Integer);

 procedure NextN(Num: Integer);
 var
   E: Integer;
 begin
   E := Round(0 / (Num - N - 1));
   Writeln(Num);
   NextN(Num + 1);
 end;

begin
 NextN(1);
end;


 
Владислав ©   (2005-12-06 07:47) [39]


> VirEx ©   (05.12.05 18:41) [34]
>
> аналогично (в смысле решения задачи) :) всякие "хитрые"
> сдвиги, умножения и переходы по фикс. адресу


Ну и? :)


 
Гость1   (2005-12-06 09:56) [40]


> Verg ©   (05.12.05 20:30) [37]
>
> > Гость1   (05.12.05 11:02) [24]
>
>
> Вызов процедуры - разновидность "goto", значит вызов процедуры
> тоже цикл?
> см. [21]


> umbra ©   (05.12.05 11:04) [25]
> 2 Гость1   (05.12.05 11:02) [24]
>
> GOTO - не цикл, а безусловный переход. Циклы и условные
> переходы сего помощью организуются.


Не надо вырывать слов из контекста.

> Гость1   (05.12.05 11:02) [24]
>
> > Труп Васи Доброго ©   (05.12.05 10:58) [23]
>
> GOTO - типа цикл :)


было сказано в конексте 23, которое было ответом на 22.

Или вы считаете, что

lb1: writeln(n)
inc(n)
GOTO lb1;

это не цикл?


 
arhis   (2005-12-06 11:45) [41]

Некорректное условие задачи. Либо, вывести без операторов, дальше список, либо задача вообще не имеет решения, потому как любые извращения со стеком, рекурсией, безусловными переходами и т.д. и т.п. приведут к использованию таких понятий как цикл или условие.


 
Digitman ©   (2005-12-06 11:47) [42]


> Kerk ©   (05.12.05 02:08)  


Вопрос был поставлен весьма некорректно - оттого и разногласия по сабжу..

Следовало бы явно уточнить, что именно Паскаль-операторы циклов и условных ветвлений не применимы в решении задачи)


 
arhis   (2005-12-06 11:51) [43]

А вообще, достали такие задачи, которые при детальном объяснении условия являются элементарными. И вся ее суть сводится к отгадыванию великой загадки: в какое полушарие мозга на этот раз ударила моча автору. Детям младшего школьного возраста еще простительно, но когда подобной ерундой страдают взрослые мужики с высшим техническим образованием это просто раздражает.


 
КаПиБаРа ©   (2005-12-06 11:57) [44]

Если включить известный тумблер в известное положение, то становится абсолютно понятно, что имел ввиду автор под понятием "цикл" и "условие".


 
arhis   (2005-12-06 12:40) [45]

КаПиБаРа ©   (06.12.05 11:57) [44]
Что помешало перевести  этот тумблер в известное положение автору задания? Все же проще это сделать одному, нежели пытаться заставить это сделать всех. Если же он хотел сбить нас с толку, то меня сразу начинает усиленно интересовать вопрос: с какой целью?


 
Digitman ©   (2005-12-06 12:46) [46]


> КаПиБаРа ©   (06.12.05 11:57) [44]


Ему, видите ли, абсолютно понятно ..

А мне вот НЕпонятно, следует ли считать, например, машинную инструкцию loop "циклом" ! Хоть она явно и не фигурирует ни в коем виде в каком-то там коде линейного алгоритма на каком-то там заранее неизвестном языке программирования..

дуриком-то не прикидывайся) ...


 
КаПиБаРа ©   (2005-12-06 12:47) [47]

А ты попробуй детально объяснить условия этой задачи. Запаришся.


 
Kerk ©   (2005-12-06 13:28) [48]


> Digitman ©   (06.12.05 12:46) [46]

Может это ты не будешь дуриком прикидываться? ;)

> arhis

Ты с какой целью в ветке?


 
КаПиБаРа ©   (2005-12-06 13:31) [49]

Digitman ©   (06.12.05 12:46) [46]
следует ли считать, например, машинную инструкцию loop "циклом" !

Нет не следует. Однако loop это условный переход, т.е. все равно не подходит по условию задачи.

Я бы вообще из условия задачи выкинул слово циклы.


 
arhis   (2005-12-06 13:37) [50]

КаПиБаРа ©   (06.12.05 12:47) [47]
Потому как, задача идиотская сама по себе. Но кому-то хочется произвести впечатление на неподготовленную аудиторию: "Без условий, без циклов, вообще без кода! Выведу что угодно и куда угодно!! Усилием воли превращаю воду в вино!!!"
В чем смысл решения этой, да и любой другой подобной задачи вообще? Вот что не дает мне покоя. Покажите мне хотя бы  гипотетическую ситуацию, черт с ними с практическими, когда у вас буду отсутствовать циклы и условия, чтобы вам пришлось так изгаляться.


 
Kerk ©   (2005-12-06 13:40) [51]

arhis   (06.12.05 13:37) [50]

> В чем смысл решения этой, да и любой другой подобной задачи
> вообще?

В чем смысл решения задач вообще? Зачем тут "пятничные задачи" периодически решают? Какой от них толк. Чувак, ты самый умный что ли? Сразу видно, ты - подготовленная аудитория. Да.


 
КаПиБаРа ©   (2005-12-06 13:41) [52]

arhis   (06.12.05 13:37) [50]
В чем смысл решения этой, да и любой другой подобной задачи вообще?

Убить время и возгордится собой после того как найдешь решение.


 
arhis   (2005-12-06 13:43) [53]

Kerk ©   (06.12.05 13:28) [48]
Зачем я здесь? За тем же за чем и вы, время убиваю, только в отличии от вас это убитое время я пытаясь потратить на то, чтобы тумана  было меньше, а не наоборот.
И если кто-то захочет порешать задачки для собственного развития, то я надеюсь, что он будет решать нормальные задачи с нормально поставленном условием и тогда от их решения будет смысл. Быть может, что мои критическуие замечания помогут им в выборе задач.


 
arhis   (2005-12-06 13:44) [54]

КаПиБаРа ©   (06.12.05 13:41) [52]


> Убить время и возгордится собой после того как найдешь решение.

У этой задачи нет решения, потому как нет условия, какие тумблеры не включай.


 
Kerk ©   (2005-12-06 13:46) [55]

arhis   (06.12.05 13:43) [53]

> За тем же за чем и вы, время убиваю, только в отличии от
> вас это убитое время я пытаясь потратить на то, чтобы тумана
>  было меньше, а не наоборот.

Какой туман? Задача уже решена и не один раз. Почитай ветку целиком.

дуриком-то не прикидывайся (с)


 
Digitman ©   (2005-12-06 13:47) [56]


> Kerk ©   (06.12.05 13:28) [48]


Роман, не хами (см. [51]), не надо)

Я еще раз повторюсь - условия задачи сформулированы тобой оч некорректно ... на тебя это не похоже, несмотря на размещение сабжа в Потрепаловке)


 
КаПиБаРа ©   (2005-12-06 13:52) [57]

arhis   (06.12.05 13:43) [53]
И если кто-то захочет порешать задачки для собственного развития, то я надеюсь, что он будет решать нормальные задачи с нормально поставленном условием и тогда от их решения будет смысл.


Увы, но зачастую жизнь не ставит задачь с нормально поставленными условиями. В этом случае нормальные условия должен задавать тот, кто решает задачу, а не тот кто ее ставит.


 
Kerk ©   (2005-12-06 13:52) [58]

Digitman ©   (06.12.05 13:47) [56]

> условия задачи сформулированы тобой оч некорректно

Да нормально условия сформулированы. Что было неясно я по ходу уточнил. Вообще там, где я задачу взял никаких разборок не было.. народ спокойно пообсуждал, сделали пару решений на С (+ мое на паскале) и успокоились.

Заметил, что всегда найдется "самый умный" и в задаче типа "получить число 7, использовав число 2 три раза" напишет что-нибудь вроде "2+2+2+1=7 lolz". Условие сформулировано хоть и не совсем точно, но и ежу понятно что требуется.


 
Digitman ©   (2005-12-06 14:03) [59]


> Kerk ©   (06.12.05 13:52) [58]


> ежу понятно что требуется


ну считай что по кр.мере я к ежам никак не отношусь


 
Думкин ©   (2005-12-06 14:13) [60]

> Kerk ©   (06.12.05 13:52) [58]

:(
Обычно про двойки формулируют так: "используя только три двойки".

> Digitman ©   (06.12.05 14:03) [59]
К ним Ega23 относится, но он в Чукотии. Солидарен с тобой, но пустое это.


 
Kerk ©   (2005-12-06 14:15) [61]

Думкин ©   (06.12.05 14:13) [60]

> "используя только три двойки".

2+2+2+1=7

Я использовал только три двойки. Все ок?


 
Digitman ©   (2005-12-06 14:17) [62]


> Думкин ©   (06.12.05 14:13) [60]


> К ним Ega23 относится, но он в Чукотии


да я помню, что он писателей навестить отправился ... однако) ...


> пустое это


ну что поделать ? иногда хочется)


 
Думкин ©   (2005-12-06 14:18) [63]

> Kerk ©   (06.12.05 14:15) [61]

Гы. подловил.
Не только 3 двойки, но и 1 единицу. Садись 2. :))
Ладно ершиться. Земляки, ети вошь.


 
Kerk ©   (2005-12-06 14:20) [64]

Думкин ©   (06.12.05 14:18) [63]

> Не только 3 двойки, но и 1 единицу. Садись 2. :))

Про единицы ничего не сказано :)
Я к тому, что нехрен придираться к условию.. нормально оно изложено... нормально.. те кто хотел понять, поняли :)


 
Sandman29 ©   (2005-12-06 14:21) [65]

Думкин ©   (06.12.05 14:18) [63]

Подожди. Ты же вроде рациональный человек. Неужели даже на тебя влияют предрассудки?


 
Думкин ©   (2005-12-06 14:23) [66]

> Sandman29 ©   (06.12.05 14:21) [65]

Рациональный. Предрассудки.
На меня Луна влияет иногда. :) И земля. Идешь, идешь - а она по лбу раз.
Ты о чем?


 
Sandman29 ©   (2005-12-06 14:24) [67]

Думкин ©   (06.12.05 14:23) [66]

Я про "землячество".


 
Думкин ©   (2005-12-06 14:28) [68]

> Kerk ©   (06.12.05 14:20) [64]

Задача какая? Реши такую на МК-61. Тогда и поговорим.


 
Digitman ©   (2005-12-06 14:29) [69]


> Думкин ©   (06.12.05 14:23) [66]


)))

Про луну эт ты кудряво загнул) ... ей-ей !) .. прямо таки по-носовски)
Хотя я тоже сразу не въехал про "предрассудки" ..


> Sandman29 ©   (06.12.05 14:24) [67]


Что из того что мы с Ромой земляки ?) тем теплее отношения, как видишь !)


 
Думкин ©   (2005-12-06 14:31) [70]

> Sandman29 ©   (06.12.05 14:24) [67]

Я понял. Но это из тех предрассудков, которые "нам строить и жить иногда помогают".
А в контексте спора - шучу я. Еть сцепка. В ней есть рациональное и иррациональное. Я за то, что рациональное выдвинутое Дигитом есть. Но и за то что и на иррацио можно было бы остановиться и плюнуть. Слюной. Не желают. Рога у обоих острые - но, да не побоюсь.


 
Sandman29 ©   (2005-12-06 14:35) [71]

Digitman ©   (06.12.05 14:29) [69]

Ну как бы получше объяснить? Например, общаются Вася, Петя и Маша. Маша говорит глупость, Вася ее поправляет. Затем Петя говорит глупость. Вася его поправляет, но при этом добавляет: "Да ладно, проехали. Мы же с тобой мужики".
Вопрос - что почувствует Маша. Нет, я, конечно, понимаю, что трудно избавиться от подсознательной симпатии, но мне кажется, что желательно ее не афишировать.


 
Sandman29 ©   (2005-12-06 14:38) [72]

Думкин ©   (06.12.05 14:31) [70]

Понял.


 
Digitman ©   (2005-12-06 14:45) [73]


> Sandman29 ©   (06.12.05 14:35) [71]


Из того что я обратился к ув.коллеге Kerk"у по имени ровным счетом ничего не следует - ни афиши ни .. Мало ли кто меня тут в форуме Серегой или иным "непотребным словом" кличет кличет !))...

Скорей ту самую афишу состряпал ты, уведомив лишний раз местную многоуважаемую общественность о подозрительно совпадающих фактах в наших анкетных данных).. Принципиально же, смею тебя заверить, это ничего не меняет


 
Думкин ©   (2005-12-06 14:46) [74]

> Sandman29 ©   (06.12.05 14:35) [71]

Ехал с Нюрки в купе с 3 людьми. Узбеки(киргизы?). Но не знакомые изначально между собой. Общались нормально. Но иногда бывало - начнут между собой квакать и ржут. Чего ржут - не понять. Рука искала несуществующий Маузер. :)


 
Sandman29 ©   (2005-12-06 14:57) [75]

Digitman ©   (06.12.05 14:45) [73]

Я первоначально понял, что Думкин - земляк Kerk"а, про Вас вообще речь не вел. И вопрос задал тоже Думкину, он мне счел нужным ответить, я ему благодарен за ответ. Ситуация прояснилась. Извините, если обидел Вас ненароком.

Думкин ©   (06.12.05 14:46) [74]

В данном случае все решается легче - их поведение противоречило этике. По правилам поведения в обществе, не рекомендуется вести беседу на языке, который не все понимают, если есть более "общий" язык. Так что в купе было обычное бескультурье, ничего общего с иррационализмом :) Но если они плохо знали русский, то их поведение нормально и вполне культурно.


 
Digitman ©   (2005-12-06 15:01) [76]


> Sandman29 ©   (06.12.05 14:57) [75]


>  Ситуация прояснилась. Извините, если


Взаимно.


 
Думкин ©   (2005-12-06 15:07) [77]

> Sandman29 ©   (06.12.05 14:57) [75]

Я знаю. И после Ерофей Павловича мне эта ситуация стала наскучивать. До Новосибирска говорили на русском. Знали они его. А под конец все сало уминали - за обе щеки. Хотя вначале отказывались - типа Коран.
Одного от резки спасли тогда под Красноярском. Старатель был. Ехал на свадьбу. Деньги. Зашли ребята с ножами и хотели ревизию провести(представились как налоговики местные - шушера, но опасная). Я под студентов скосил(какую-то бумажку показал институтскую). Вышли. Двери до Красноярска не открывали. Проводник навел - вернее сдал.
А так - народ без одежды из тамбура выкидывают. :(


 
Sandman29 ©   (2005-12-06 15:13) [78]

Думкин ©   (06.12.05 15:07) [77]

Нифига себе. Не поеду к вам, запугал ты меня.


 
Digitman ©   (2005-12-06 15:19) [79]


> Sandman29 ©   (06.12.05 15:13) [78]


"Вот таки дела !" (С) Сердючка, если мне память не изменяет

Резюме : сало не решает проблем с корректным изложением сути проблемы, хоть и трескают его, родимое, от хохлов и кацапов до самых малых славных народностей и прочих узбеков-латышей)


 
VirEx ©   (2005-12-06 16:59) [80]


>  Вывести числа от 1 до 100 без циклов и условий
>
> Kerk ©   (05.12.05 02:08)  
> Сабж. Такая вот задачка.


жуткие метаморфозы.....
результат:


>
> Digitman ©   (06.12.05 15:19) [79]
>
> > Sandman29 ©   (06.12.05 15:13) [78]
>
>
> "Вот таки дела !" (С) Сердючка, если мне память не изменяет
>
> Резюме : сало не решает проблем с корректным изложением
> сути проблемы, хоть и трескают его, родимое, от хохлов и
> кацапов до самых малых славных народностей и прочих узбеков-
> латышей)


однако эволюция :)



Страницы: 1 2 вся ветка

Текущий архив: 2006.01.01;
Скачать: CL | DM;

Наверх




Память: 0.7 MB
Время: 0.042 c
1-1133814964
Fedia
2005-12-05 23:36
2006.01.01
Перетаскивание формы вместе с фреймом за контрол


14-1133960549
MadAngel
2005-12-07 16:02
2006.01.01
Проблема с explorer.exe


2-1134689494
Змей
2005-12-16 02:31
2006.01.01
не активная кнопка "Свернуть"


2-1133960986
Plotnick
2005-12-07 16:09
2006.01.01
Как сделать приличную тень под окном


14-1133520452
oleggar
2005-12-02 13:47
2006.01.01
dbf viewer