Проверь соединение с жестким диском , порядок загрузки в биосе.
Десять плюс одиннадцать плюс двенадцать плюс четырнадцать плюс пятнадцать умножить на девятнадцать и разделить на пять равно.....
<em>// PascalABC.NET 3.2, сборка 1407 от 18.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
for var a:=1 to 6 do
for var c:=0 to 5 do
for var b:=0 to 4 do
for var d:=5 to 9 do
if (a+c=6) and (b-d=-5) then Write(a,b,c,d,' ');
Writeln
end.
<u>Результат</u>
1055 1156 1257 1358 1459 2045 2146 2247 2348 2449 3035 3136 3237 3338 3439 4025 4126 4227 4328 4429 5015 5116 5217 5318 5419 6005 6106 6207 6308 6409
В последовательности длиной 5 возможны следующие способы расположения буквы О (* - любая из букв К или Т):
ОО***
О*О***
О**О*
О***О
*ОО**
*О*О*
*О**О
**ОО*
**О*О
***ОО
Всего 10 способов. В каждом из низ существует 2^3 = 8 вариантов записи букв К и Т на трёх оставшихся позициях (ККК, ККТ, КТК, КТТ, ТКК, ТКТ, ТТК, ТТТ).
Таким образом, общее количество последовательностей = 10*8 = 80