|
|
| Другие темы раздела | |
|
PascalABC.NET Решение нелинейного уравнения методом хорд
https://www.cyberforum.ru/ pascalabc-net/ thread2168945.html Нужно составить программу нахождения корней нелинейного уравнения на заданном отрезке методом хорд: а) x + cos(x^0.52 + 2) = 0 б) 3(ln x)^2 + ln x - 5 = 0 в) sin (x^2) + cos (x^2) - 10x = 0 |
Фоновый режим PascalABC.NET Как сделать что бы программа работала в фоновом режиме??? |
|
PascalABC.NET Floodfill. Не заливается
https://www.cyberforum.ru/ pascalabc-net/ thread2168743.html uses graphABC; var i,c,z,x1,y1,x2,y2,x,y:integer; A:array of point; begin SetPenWidth(1); //солнце SetPenColor(ClYellow); SetBrushColor(ClYellow); x1 := -50; y1 := -45; x2 := 80; y2 := 60; ellipse(x1, y1, x2, y2); |
PascalABC.NET Перевод кода из C в Pascal ABC.NET Здравствуйте, помогите плз с переводом кода из С в Pascal ABC.net. необходимо перевести данный код в Паскаль,возможно ли это сделать, буду премного благодарен #ifdef little_endian /* Eg: Intel */ #include <dos.h> #include <graphics.h> #include <io.h> #endif #include <math.h> #include <stdio.h> #include <stdlib.h> #include <time.h> https://www.cyberforum.ru/ pascalabc-net/ thread2168668.html |
|
PascalABC.NET Алгоритм шифрования Blowfish Доброго времени суток, требуется написать алгоритм шифрования типа Blowfish, есть уже небольшие наработки с данным алгоритмом, но проблема возникла с функцией Фейстеля, не совсем понимаю как ее реализовать в рамках моего алгоритма... В константах объявлены P и S массивы var key: String; superkey: cardinal; procedure crypton;//алгоритм расширения ключа var K: cardinal; n, i:... |
PascalABC.NET Сумма ряда
https://www.cyberforum.ru/ pascalabc-net/ thread2168657.html Добрый день, помогите выполнить задание по информатике |
|
PascalABC.NET Найти площадь треугольника через заданную сторону квадрата
https://www.cyberforum.ru/ pascalabc-net/ thread2168521.html найти площадь треугольника через заданную сторону квадрата |
PascalABC.NET Музыкальный плеер Как сделать чтобы нельзя было одновременно включать несколько песен или одну и ту же самую?? В данный момент при нажатии на другие кнопки песен, прошлая продолжает играть {$apptype windows} {$reference 'System.Windows.Forms.dll'} {$reference 'System.Drawing.dll'} {$reference 'PresentationCore.dll'} {$reference 'System.Windows.Forms.dll'} uses System.Windows.Forms, |
| PascalABC.NET Как исправить ошибку? Хелп, почему перед "else if Otvet = 'Нет' then" ошибка - ожидалось '.' ? Program Chatbot; https://www.cyberforum.ru/ pascalabc-net/ thread2168390.html |
PascalABC.NET Мелькание окружностей
https://www.cyberforum.ru/ pascalabc-net/ thread2168261.html uses GraphABC; const Size = 60; // размер квадрата Shift = 10; // отступ от квадрата MinSize = 10; // минимальный размер квадрата MaxSize = 48; // максимальный размер квадрата MinR = 10;// минимальный радиус окружности MaxR = 70; // максимальный радиус окружности PercentR = 30; // количество процентов от радиуса MaxH = 200; // высота треугольника |
|
Сформировать новую матрицу B, изъяв из матрицы A строку, в которой расположен максимальный элемент PascalABC.NET Здравствуйте. С Новым годом всех ! Помогите, пожалуйста, дорешать задачу : Сформировать новую матрицу B, изъяв из матрицы A строку, в которой расположен максимальный элемент среди элементов главной диагонали. program 1; const n=4; m=4; var A:array of real; max,imax:real; i,j:integer; var B:array of real; begin |
PascalABC.NET Однобайтовое беззнаковое число Как можно проверить, равны ли между собой левая и правая половина двоичной записи однобайтового беззнакового числа А (A:byte)? if (A shl 4) = (A shr 4) then write(ДА); if A*16 = (A and $F0) then write(ДА); if (A shr 4) = (A and $F) then write(ДА); https://www.cyberforum.ru/ pascalabc-net/ thread2167846.html |
|
Платежеспособный зверь
8835 / 4269 / 1621
Регистрация: 28.10.2009
Сообщений: 11,407
|
|
| 04.01.2018, 14:56 | 0 |
Интересная математическая задача - PascalABC.NET - Ответ 1200157004.01.2018, 14:56. Показов 1548. Ответов 2
Метки (Все метки)
Ответ
Понятно, что из 12 команд 6 обязательно будут RIGHT, а 4 обязательно будут UP. Оставшиеся две команды будут противоположны, то есть LEFT-RIGHT (или наоборот) или UP-DOWN (или наоборот)- 4 варианта. Остаётся методами комбинаторики посчитать количество различных перестановок 6 команд RIGHT и 4 команд UP, не забывая вставить две противоположные команды.
Вернуться к обсуждению: Интересная математическая задача PascalABC.NET
1
|
|
|
|
| 04.01.2018, 14:56 | |
|
Готовые ответы и решения:
2
Линейная интерполяция (интересная задача) Математическая задача Математическая задача
|
| 04.01.2018, 14:56 | |
|
Помогаю со студенческими работами здесь
0
Математическая задача
Математическая задача в С++ Математическая задача |
Наверх