Тест для професионалов

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Тест для професионалов

Сообщение AjaxVS » 27.10.2005 (Чт) 11:44

Предыстория...
Так получилось, что я учился в одном лицее с лучшим программистом области и одним из лучших в Украине (Леонид Холодов). (это не просто предположение, это результаты многих конкурсов)...
Мы с ним долго не виделись, и вот вчера я случайно встретил его. Поделившись тем, что я всерьез стал кодить, наш признанный гений задал задачку, сказав, что она - своеобразный тест в его кругах...
Итак...

ЗАДАЧА.
Реализовать на С++ функцию, которая возвращает от целого числа инвертированное целое число, т.е.:
f(123) = 321
f(-1234)=-4321.
Вам эта заача не знакома?

Условие:
Нужно посчитать, за какое количество слов вы сможете это сделать.
Примечание.
Под словом понимается:
1. оператор языка(if, else, for.......)
2. идентификатор переменных, и название переменных/функций и т.д.
(т.е. "int k;" - это 2 слова)
3. типы.
Не считать словами пунктуацию, включая:
(,),{,},||,<<...................

Рекорд, который мне был предложен, чтобы "быть признанным профи" - 16 слов.

Вчера я попробовал... Хоть я уже серьезно не кодил на С несколько лет, у меня получилось 8 слов на тело функции, 4 на ее описание (long funIntReverse(long i)), 2 на "return k"...
Т.е. итого = 14 слов....

Предлагаю побить мой результат...

AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Сообщение AjaxVS » 27.10.2005 (Чт) 11:47

Повторюсь - этот человек раньше был идолом для многих программеров Донбасса... Отнеситесь к задаче серьезно... Это интересно, обещаю, вы получите массу удовольствий...

Предлогаю неделю постить только результаты, а потом победитель покажет исходный код...

Спасибо за внимание.

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 27.10.2005 (Чт) 12:03

Ещё было бы интересно узнать, что подключено.

Потому что atoi(strreverse(itoa(i))) - это не круто.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Сообщение AjaxVS » 27.10.2005 (Чт) 12:08

Не, ну ясно, что использовать стандартные... эээ... основные *.h,
т.е. типа stdio.h... Можно, вроде, math.h...

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 27.10.2005 (Чт) 12:10

Гы гы.
Набор стандартных и... эээ... основных .h в студию.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Re: Тест для професионалов

Сообщение tyomitch » 27.10.2005 (Чт) 12:15

AjaxVS писал(а):Так получилось, что я учился в одном лицее с лучшим программистом области и одним из лучших в Украине

А не путает ли он понятия "программирование" и "кодинг на Си"?
А то, глядишь, и самого Вирта запишете в самозванцы за то, что он пишет не на Си.


И почему этот топик в разделе "VB", интересно?
Изображение

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 27.10.2005 (Чт) 12:23

Ещё, FTR: у нас эта задача (правда, на Паскале и для полож. чисел) разбиралась в 10 классе, в теме "циклы".

Мой результат на Си: 8+6=14 слов достигнуто. Меньше, предположительно, уже некуда.

[edit]7+5=12 слов; не знаю, соответствует ли это стандарту Си, но VC6 компилирует[/edit]

Без никаких библиотек.
Изображение

AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Сообщение AjaxVS » 31.10.2005 (Пн) 9:43

>>А не путает ли он понятия "программирование" и "кодинг на Си"?
Этот парень занимал первые места на многих гос.конкурсах, а насчет олимпиад я вообще молчу... Это реально крутой чел...

>>Набор стандартных и... эээ... основных .h в студию.
Ладно, ладно... Не использовать никаких *.h, кроме stdlib.h

>>И почему этот топик в разделе "VB", интересно?
Не просто в "VB", а в "VB не для новичков" +_+ А для "не новичков" пофиг, на каком языке писать +_+

>>Мой результат на Си: 8+6=14 слов достигнуто. Меньше, предположительно, уже некуда.
Ну, в общем, я тоже так думаю... но надеялся... Давай код в студию!

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 31.10.2005 (Пн) 10:10

AjaxVS писал(а):>>А не путает ли он понятия "программирование" и "кодинг на Си"?
Этот парень занимал первые места на многих гос.конкурсах, а насчет олимпиад я вообще молчу... Это реально крутой чел...

Парень-то, может, и крутой, но данный "тест" никоим образом не проверяет профессионализм программиста. Этот "тест" проверяет разве что знание Си.

AjaxVS писал(а):>>И почему этот топик в разделе "VB", интересно?
Не просто в "VB", а в "VB не для новичков" +_+ А для "не новичков" пофиг, на каком языке писать +_+

Тут принято топики, не имеющие отношения к VB, обсуждать в разделах групп "Администрирование" и ниже.
Был бы тест на VB - другое дело.

AjaxVS писал(а):>>Мой результат на Си: 8+6=14 слов достигнуто. Меньше, предположительно, уже некуда.
Ну, в общем, я тоже так думаю... но надеялся... Давай код в студию!

Код: Выделить всё
invert(int i) {   
   for (int k=0;;) {
      (k*=10)+=(i%10);
      if(!(i/=10)) return k;
   }
}

Проверь - 12 слов.
Прогонялось в VC6.
Изображение

Twister
Теоретик
Теоретик
Аватара пользователя
 
Сообщения: 2251
Зарегистрирован: 28.06.2005 (Вт) 12:32
Откуда: Алматы

Сообщение Twister » 31.10.2005 (Пн) 12:07

Темыч, ты прям РАСТОПТАЛ крутого чувака с ДонБасса... :lol:
А я все практикую лечение травами...

AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Сообщение AjaxVS » 02.11.2005 (Ср) 10:06

Да ладно вам...
Лично мне было интересно решить эту задачу... Я подумал, может, кому-то будет тоже...

Больше такого делать не буду. Извините +_+

pitbull
Постоялец
Постоялец
 
Сообщения: 314
Зарегистрирован: 25.06.2004 (Пт) 15:37
Откуда: Кемерово

Сообщение pitbull » 02.11.2005 (Ср) 19:37

Кто к нам с камерой придет, тот в камере и погибнет..... :D

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 02.11.2005 (Ср) 19:48

AjaxVS писал(а):Да ладно вам...
Лично мне было интересно решить эту задачу... Я подумал, может, кому-то будет тоже...

Выходит, одному мне тут это было интересно :-|

AjaxVS писал(а):Больше такого делать не буду. Извините +_+

В Народном Трёпе - сколько угодно.


ЗЫ: вот сейчас как раз грызу конфеты донецькие, зi смаком журавлини =) Так что Донецьку респект.
Изображение

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 02.11.2005 (Ср) 19:50

Со вкусом журавлинины? :?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 02.11.2005 (Ср) 19:59

Эх...
Напомнили детство :)
Книжка была когда-то, там это слово было :)
Помню, что ягода, красная, а какая - не помню :)

[edit]Книжка, кстати вот, часть её, вернее :) Таки клюква.[/edit]
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 02.11.2005 (Ср) 20:18

А как по-украински будет варенье из фейхоа? :)

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 02.11.2005 (Ср) 20:19

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

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 02.11.2005 (Ср) 20:29

Не-не! =)
Прилагательное нуна.

DaSharm_nn
Начинающий
Начинающий
 
Сообщения: 23
Зарегистрирован: 25.10.2005 (Вт) 22:41

Сообщение DaSharm_nn » 02.11.2005 (Ср) 22:43

http://www.google.com/search?client=ope ... 8&oe=utf-8

ниодного нормального совпадения. Отсюда делаем выводы

Brusco
Обычный пользователь
Обычный пользователь
 
Сообщения: 50
Зарегистрирован: 22.10.2004 (Пт) 3:16
Откуда: Reutov, Russia

Сообщение Brusco » 03.11.2005 (Чт) 5:04

:) А VB всё-же лучше.

Код: Выделить всё
Private Function invert(I As Integer) As String
   invert = StrReverse(I)
End Function

uhm
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1597
Зарегистрирован: 02.12.2004 (Чт) 15:21

Сообщение uhm » 03.11.2005 (Чт) 11:12

Не, у тебя 13 слов получилось :)
И ты строку возвращаешь :roll:
Быть... или не быть. Вот. В чём вопрос?

AjaxVS
Постоялец
Постоялец
 
Сообщения: 506
Зарегистрирован: 01.12.2004 (Ср) 13:12
Откуда: Donetsk, Battle.Net

Сообщение AjaxVS » 03.11.2005 (Чт) 11:18

За Донецк - спасибо! +_+

ЗЫ. Тока не пытайтесь перевести слово "стрекоза" или "чайник" на украинский +_+

Все, кончаем флудить...

pitbull
Постоялец
Постоялец
 
Сообщения: 314
Зарегистрирован: 25.06.2004 (Пт) 15:37
Откуда: Кемерово

Сообщение pitbull » 03.11.2005 (Чт) 17:35

а что получиться?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 03.11.2005 (Чт) 17:44

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

pitbull
Постоялец
Постоялец
 
Сообщения: 314
Зарегистрирован: 25.06.2004 (Пт) 15:37
Откуда: Кемерово

Сообщение pitbull » 03.11.2005 (Чт) 18:18

GSerg
Ну дык поведай плз... Там подись че-нить смешное жутко? или я не прав?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 03.11.2005 (Чт) 18:20

Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

pitbull
Постоялец
Постоялец
 
Сообщения: 314
Зарегистрирован: 25.06.2004 (Пт) 15:37
Откуда: Кемерово

Сообщение pitbull » 03.11.2005 (Чт) 19:33

2GSerg
ржунемогу :D :D :D :D :D :D
Пасиба са линк!
2AjaxVS
Поведай, как чайник-то переводится?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 03.11.2005 (Чт) 19:41

pitbull
Спроси у Яндекса, в конце концов :)
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 03.11.2005 (Чт) 19:46

Яндекс говорит "ху...к". Что в середине?
Угадывать по буквам, или кто-нибудь назовёт слово сразу? :-D
Изображение

След.

Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: SemrushBot и гости: 170

    TopList