|
|
| Другие темы раздела | |
|
Pascal Шифр Виженера
https://www.cyberforum.ru/ pascal/ thread1896177.html Помогите разобраться, почему неправильно переводит программа. p.s. Все программы которые на сайте и в Интернете по шифрованию Виженера просмотрены. По таблице Ascii 224-255-большие буквы 191-223-маленьккие буквы program pr1; var s,s1:string;i,j,c,p,k: integer; begin writeln('Введите исходный текст '); |
Pascal Даны две строки Определите, содержится ли меньшая по длине строка в большей Даны две строки. Определите, содержится ли меньшая по длине строка в большей Помогите написать! С блок схемой. |
|
Pascal Дан текст, найти слова, состоящие из цифр, и сумму чисел, которые образуют эти слова
https://www.cyberforum.ru/ pascal/ thread1896005.html Дан текст. Найти слова, состоящие из цифр, и сумму чисел, которые образуют эти слова. Помогите написать! С блок схемой. |
Pascal Реализуйте серию из n игр "Камень, ножницы, бумага" с компьютером Реализуйте серию из n игр "Камень, ножницы, бумага" с компьютером. В результате выведите статистику: сколько игр выиграл пользователь, сколько раз каждого вида ходов было выбрано. Дополните игру анализом компьютера ваших ходов и выбор наиболее подходящего против вас хода. Помогите написать! С блок схемой. https://www.cyberforum.ru/ pascal/ thread1896004.html |
|
Pascal Перевести из бейсика в паскаль Помогите пожалуйста перевести в паскаль Private Sub Button1_Click(...) Handles Button1.Click Dim n As Byte Dim b, x, y, h, xn, xk As Single TextBox1.Text = "" b = Val(TextBox2.Text) xn = Val(TextBox3.Text) xk = Val(TextBox4.Text) h = Val(TextBox5.Text) n = CInt((xk - xn) / h) + 1 |
Pascal Составить из имеющихся четных цифр максимальное число, читающееся одинаково слева направо и наоборот
https://www.cyberforum.ru/ pascal/ thread1895629.html На вход подается набор символов, оканчивающийся точкой. Количество символов не превышает 200. Составить из имеющихся в тексте четных цифр максимальное число, которое читается одинаково как слева направо, так и справа налево. Все цифры можно не использовать; незначащих нулей в числе не должно быть. Если требуемое число составить нельзя, то вывести строку «NO»; если можно, то в первой строке... |
|
Pascal Использование оператора repeat.until
https://www.cyberforum.ru/ pascal/ thread1895619.html Доброго времени суток, уважаемые форумчане! Задали написать программу, вот условие: Написать программу, которая через диалог с пользователем выводит частное от деления двух чисел. Если в качестве делителя пользователем введен 0, предложить пользователю ввести другое значение. Если пользователь отказывается изменить значение делителя, вывести сообщение о невозможности получения результата и... |
Лепёшки Pascal На сковороде одновременно можно положить k лепешек. Каждую лепешку нужно непрерывно обжаривать m минут с каждой стороны до полной ее готовности. За какое наименьшее время удастся поджарить n лепешек? Входные данные: В единственной строке входного потока записано три натуральных числа: k, m, n, не превышающих 30000. Выходные данные: В единственную строку выходного потока нужно вывести... |
| Pascal Найти минимальные значения по всем строкам матрицы и представить их в форме одномерного массива Привет,помогите написать программу.Буду очень благодарен!!! Разработать программу, в которой предусмотреть: - ввод размерности NxM двумерного массива А, - задание элементов массива двумя способами: ввод с клавиатуры и формирование значений с помощью функции RANDOM(K) генерирования случайных чисел в диапазоне . Найти минимальные значения по всем строкам матрицы и представить их в форме... https://www.cyberforum.ru/ pascal/ thread1895026.html |
Pascal Как найти количество способов образования одного числа из другого?
https://www.cyberforum.ru/ pascal/ thread1895019.html Как найти количество способов образования одного числа из другого, если можно только умножать на 2 или прибавлять 1. Например, каким количеством способов можно получить из числа 1 число 4. Заранее спасибо:cry: |
|
Простое число в виде суммы простых чисел Pascal Помогите доработать код, найденный на просторах интернета, чтобы он простое число представлял в виде суммы других последовательных чисел function prost(x:integer):boolean; var y:integer; begin x:=abs(x); if x<2 then result:=false else if x=2 then result:=true else if x mod 2=0 then result:=false else begin |
Pascal Поменять местами наибольшую и наименьшую цифры в числе В заданном целом положительном числе N поменять местами наибольшую и наименьшую цифры. Предусмотреть случай, когда таких цифр нет. https://www.cyberforum.ru/ pascal/ thread1894886.html |
|
7 / 4 / 0
Регистрация: 08.01.2017
Сообщений: 35
|
|
| 09.01.2017, 16:35 [ТС] | 0 |
Составить алгоритм для вычисления стоимости мебельного гарнитура - Pascal - Ответ 998540309.01.2017, 16:35. Показов 3002. Ответов 9
Метки (Все метки)
Ответ
Puporev, а без массива как ?
Вернуться к обсуждению: Составить алгоритм для вычисления стоимости мебельного гарнитура Pascal
0
|
|
| 09.01.2017, 16:35 | |
|
Готовые ответы и решения:
9
Вычислить стоимость мебельного гарнитура,содержащего 4 стула,2 кресла и 1 стол
Составить блок-схему, алгоритм вычисления и программу для вычисления значения кусочно заданной функции |
| 09.01.2017, 16:35 | |
| 09.01.2017, 16:35 | |
|
Помогаю со студенческими работами здесь
0
Составить алгоритм-вычисление квадрата суммы двух чисел и алгоритм для вычисления функции Составить алгоритм для вычисления функции, составить 2 блок-схемы
|