Платформа: CodeWars

 Название задачи: Rock Paper Scissors Lizard Spock

 Ссылка на задачу: https://www.codewars.com/kata/57d29ccda56edb4187000052 (Нажмите на строку)

 Сложность: 7 kyu

 Тэги: Фундаментальные, Логика

 Оригинальное описание задачи:

In this kata, your task is to implement an extended version of the famous rock-paper-scissors game. The rules are as follows:

• Scissors cuts Paper
• Paper covers Rock
• Rock crushes Lizard
• Lizard poisons Spock
• Spock smashes Scissors
• Scissors decapitates Lizard
• Lizard eats Paper
• Paper disproves Spock
• Spock vaporizes Rock
• Rock crushes Scissors

Task:

Given two values from the above game, return the Player result as "Player 1 Won!", "Player 2 Won!", or "Draw!".

Inputs

Values will be given as one of "rock", "paper", "scissors", "lizard", "spock".

Пояснение:

Суть задачи заключается в том чтобы определить победителя в расширенной версии (я полагаю взято из ТБВ) игры "Камень - Ножницы - Бумага". В качестве входных данных нам будут давать 2 значения, по одному из элементов от каждого игрока и затем в качестве результата мы будем возвращать строку с результатом. Давайте придумаем решение!

Решение:

Для начала определим какую нибудь структуру данных со слабостями всех элементов игры по типу "Камень":["Бумага","Спок"] чтобы было удобно писать саму логику игры. Далее сравниваем не равны ли выборы игроков друг другу для того чтобы объявить ничью. Если не равны то просто берём любой из выборов и проверяем список его слабостей, передав выбор оппонента. Если что-то найдено, значит проигрыш, наоборот, выигрыш! Вот как это будет выглядеть в коде:

ЭлементыИгры = Новый Соответствие;
//
ЭлементыИгры.Вставить("Камень",Новый Массив);
ЭлементыИгры["Камень"].Добавить("Бумага");
ЭлементыИгры["Камень"].Добавить("Спок");
//
ЭлементыИгры.Вставить("Бумага",Новый Массив);
ЭлементыИгры["Бумага"].Добавить("Ножницы");
ЭлементыИгры["Бумага"].Добавить("Ящерица");
//
ЭлементыИгры.Вставить("Ножницы",Новый Массив);
ЭлементыИгры["Ножницы"].Добавить("Спок");
ЭлементыИгры["Ножницы"].Добавить("Камень");
//
ЭлементыИгры.Вставить("Ящерица",Новый Массив);
ЭлементыИгры["Ящерица"].Добавить("Камень");
ЭлементыИгры["Ящерица"].Добавить("Ножницы");
//
ЭлементыИгры.Вставить("Спок",Новый Массив);
ЭлементыИгры["Спок"].Добавить("Ящерица");
ЭлементыИгры["Спок"].Добавить("Бумага");
//
ВыборПервогоИгрока = "Спок";
ВыборВторогоИгрока = "Ящерица";
//
Если ВыборПервогоИгрока = ВыборВторогоИгрока Тогда
	Вывод = "Ничья";
Иначе
	Если ЭлементыИгры[ВыборПервогоИгрока].Найти(ВыборВторогоИгрока) <> Неопределено Тогда
		Вывод = "Выиграл второй игрок!";
	Иначе
		Вывод = "Выиграл первый игрок!";
	КонецЕсли;
КонецЕсли;

Заключение:

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

 Платформа: CodeWars

 Название задачи: V A P O R C O D E

 Ссылка на задачу: https://www.codewars.com/kata/5966eeb31b229e44eb00007a (Нажмите на строку)

 Сложность: 7 kyu

 Тэги: Фундаментальные

 Оригинальное описание задачи:

ASC Week 1 Challenge 4 (Medium #1)

Write a function that converts any sentence into a V A P O R W A V E sentence. a V A P O R W A V E sentence converts all the letters into uppercase, and adds 2 spaces between each letter (or special character) to create this V A P O R W A V E effect.

Note that spaces should be ignored in this case.

Examples

"Lets go to the movies"       -->  "L  E  T  S  G  O  T  O  T  H  E  M  O  V  I  E  S"
"Why isn't my code working?"  -->  "W  H  Y  I  S  N  '  T  M  Y  C  O  D  E  W  O  R  K  I  N  G  ?"

Пояснение:

По условию задачи нам будет даваться предложение, которое мы должны отформатировать в стиле "Vaporwave". Этот стиль представляет собой набор символов в верхнем регистре, разделенных специальным символом (конкретно в нашем случае условия предполагают использование двух пробелов). Звучит просто, давайте попробуем решить!

Решение:

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

ИсходнаяСтрока = "Lets go to the movies";
//
ИсходнаяСтрока = СтрЗаменить(ИсходнаяСтрока," ","");
Вывод = "";
Для НомерСтроки = 1 По СтрДлина(ИсходнаяСтрока) Цикл
	Вывод = Вывод + ВРег(Сред(ИсходнаяСтрока,НомерСтроки,1)) + " " 
КонецЦикла;

Заключение:

Ранее не слышал про стиль текста Vaporwave, было интересно узнать что-то новое!

 Платформа: CodeWars

 Название задачи: See You Next Happy Year

 Ссылка на задачу: https://www.codewars.com/kata/5ae7e3f068e6445bc8000046 (Нажмите на строку)

 Сложность: 7 kyu

 Тэги: Фундаментальные

 Оригинальное описание задачи:

Scenario

You're saying good-bye your best friend , See you next happy year .

Happy Year is the year with only distinct digits , (e.g) 2018

---

Task

Given a year, Find The next happy year or The closest year You'll see your best friend

---

Notes

• Year Of Course always Positive .
• Have no fear , It is guaranteed that the answer exists .
• It's not necessary that the year passed to the function is Happy one .
• Input Year with in range (1000  ≤  y  ≤  9000)

---

Input >> Output Examples:

nextHappyYear (7712) ==> return (7801)

Explanation:

As the Next closest year with only distinct digits is 7801 .

---

nextHappyYear (8989) ==> return (9012)

Explanation:

As the Next closest year with only distinct digits is 9012 .

---

nextHappyYear (1001) ==> return (1023)

Explanation:

As the Next closest year with only distinct digits is 1023 .

Пояснение:

В качестве входных данных мы будем получать какой-то Год. По условию задачи нам необходимо найти следующий после данного года год, цифры в котором не повторяются (distinct). Например текущий год 2024 (не содержит уникальные цифры), следующим годом с уникальными цифрами будет 2031. Суть проста и понятна, начнём решать!

Решение:

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

ИсходныйГод = 2024;
//
Пока Вывод = Неопределено Цикл
	ИсходныйГод = ИсходныйГод + 1;
	Уникальный = Истина;	
	Для НомерСтроки = 1 По СтрДлина(Строка(ИсходныйГод)) Цикл
		Если СтрЧислоВхождений(Строка(ИсходныйГод),Сред(Строка(ИсходныйГод),НомерСтроки,1)) > 1 Тогда
			Уникальный = Ложь;
			Прервать;
		КонецЕсли;	
	КонецЦикла;
	//
	Если Уникальный Тогда
		Вывод = ИсходныйГод;
	КонецЕсли;
КонецЦикла;

Заключение:

Интересная получилась задача. Решение думаю более мене оптимальное!

 Платформа: CodeWars

 Название задачи: Consecutive strings

 Ссылка на задачу: https://www.codewars.com/kata/56a5d994ac971f1ac500003e (Нажмите на строку)

 Сложность: 6 kyu

 Тэги: Фундаментальные

 Оригинальное описание задачи:

You are given an array(list) strarr of strings and an integer k. Your task is to return the first longest string consisting of k consecutive strings taken in the array.

Examples:

strarr = ["tree", "foling", "trashy", "blue", "abcdef", "uvwxyz"], k = 2

Concatenate the consecutive strings of strarr by 2, we get:

treefoling   (length 10)  concatenation of strarr[0] and strarr[1]
folingtrashy ("      12)  concatenation of strarr[1] and strarr[2]
trashyblue   ("      10)  concatenation of strarr[2] and strarr[3]
blueabcdef   ("      10)  concatenation of strarr[3] and strarr[4]
abcdefuvwxyz ("      12)  concatenation of strarr[4] and strarr[5]

Two strings are the longest: "folingtrashy" and "abcdefuvwxyz".
The first that came is "folingtrashy" so 
longest_consec(strarr, 2) should return "folingtrashy".

In the same way:
longest_consec(["zone", "abigail", "theta", "form", "libe", "zas", "theta", "abigail"], 2) --> "abigailtheta"

n being the length of the string array, if n = 0 or k > n or k <= 0 return "" (return Nothing in Elm, "nothing" in Erlang).

Note

consecutive strings : follow one after another without an interruption

Пояснение:

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

Например дан массив ["zone", "abigail", "theta", "form", "libe", "zas", "theta", "abigail"] и число 2

Из возможных вариантов будет "zoneabigail", "abigailtheta", "thetaform" и так далее, по 2 штуки. Правильным ответом будет "abigailtheta" так как это самая длинна строка, которая возможна при объединении двух последовательных элементов массива. Думаю всё понятно, давайте попробуем решить!

Решение:

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

ИсходныйМассив = Новый Массив;
ИсходныйМассив.Добавить("zone");
ИсходныйМассив.Добавить("abigail");
ИсходныйМассив.Добавить("theta");
ИсходныйМассив.Добавить("form");
ИсходныйМассив.Добавить("libe");
ИсходныйМассив.Добавить("zas");
ИсходныйМассив.Добавить("theta");
ИсходныйМассив.Добавить("abigail");
//
ИсходноеЧисло = 2;
//
ТекущееКоличество = 0;
ТекущаяСтрока = "";
Вывод = "";
Для Каждого Стр Из ИсходныйМассив Цикл
	ТекущаяСтрока = ТекущаяСтрока + Стр;
	ТекущееКоличество = ТекущееКоличество + 1;
	Если ТекущееКоличество = ИсходноеЧисло Тогда
		Если СтрДлина(ТекущаяСтрока) > СтрДлина(Вывод) Тогда
			Вывод = ТекущаяСтрока;
		КонецЕсли;		
		ТекущаяСтрока = Стр;
		ТекущееКоличество = 1;
	КонецЕсли;
КонецЦикла;

Заключение:

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

 Платформа: CodeWars

 Название задачи: Find the calculation type

 Ссылка на задачу: https://www.codewars.com/kata/5aca48db188ab3558e0030fa (Нажмите на строку)

 Сложность: 7 kyu

 Тэги: Фундаментальные

 Оригинальное описание задачи:

You have to create a function calcType, which receives 3 arguments: 2 numbers, and the result of an unknown operation performed on them (also a number).

Based on those 3 values you have to return a string, that describes which operation was used to get the given result.

The possible return strings are: "addition", "subtraction", "multiplication", "division".

Example:

calcT_type(1, 2, 3) -->   1 ? 2 = 3   --> "addition"

Notes

• In case of division you should expect that the result of the operation is obtained by using / operator on the input values - no manual data type conversion or rounding should be performed.
• Cases with just one possible answers are generated.
• Only valid arguments will be passed to the function.

Only valid arguments will be passed to the function!

Пояснение:

В качестве входных данных мы будем получать 3 числа. Суть задачи заключается в том чтобы понять какая математическая операция была проведена с первыми двумя числами чтобы получить третье число.

Например даны числа [1,2,3], вполне себе понятно что первые два числа были сложены, с целью получить третье число. Следовательно возвращаем название операции "Сложение". Звучит понятно, давайте попробуем написать решение!

Решение:

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

ИсходныеДанные = Новый Массив;
ИсходныеДанные.Добавить(1);
ИсходныеДанные.Добавить(2);
ИсходныеДанные.Добавить(3);
//
Если ИсходныеДанные[0] + ИсходныеДанные[1] = ИсходныеДанные[2] Тогда
	Вывод = "Сложение";
ИначеЕсли ИсходныеДанные[0] - ИсходныеДанные[1] = ИсходныеДанные[2] Тогда
	Вывод = "Вычитание";
ИначеЕсли ИсходныеДанные[0] * ИсходныеДанные[1] = ИсходныеДанные[2] Тогда
	Вывод = "Умножение";
ИначеЕсли ИсходныеДанные[0] / ИсходныеДанные[1] = ИсходныеДанные[2] Тогда
	Вывод = "Деление";
КонецЕсли; 

Заключение:

Весьма простая получилась задача с коротким решением. Но тем не менее было занимательно!