|
|
Другие темы раздела | |
Free Pascal Паркур в паскале задача про паркур! Для проведения соревнования по паркуру организаторы подготовили трассу. Участники должны преодолеть эту трассу перемещяясь по площадкам , установленным на различной высоте . При этом на то , чтобы перепрыгнуть с одной площадки на соседнюю нужно затратить \у2-у1\ едениц энергии , где у1 и у2 - высоты , на которых расположены площадки . Участникам можно перескочить через... https://www.cyberforum.ru/ free-pascal/ thread178352.html |
Free Pascal Родственные числа помогите с задачей ,Назовём числа А и В родственными если можно получить десятичную запись числа А путём вычёркивания одной или более цифр из десятичной записи числа В . Напишите программу , которая определяет , являются ли числа ,родственными,. пожалуста помогите кто может! |
Free Pascal драсти очень нужна помаш в написании нескольких заданий.
https://www.cyberforum.ru/ free-pascal/ thread178225.html Место для формулы.Обработка строк! 1я задача Дана последовательность, содержащая от 1 до 30 слов, в каждом из которых от 1 до 5 строчных латинских букв ; Между соседними словами-запятая, за последним словом – точка. Вывести этуже последовательность слов, но удалив из нее повторные вхождения слов. Обработка записей! 2я задача 1. описать запись с именем Student содержащую следующие поля:... |
Free Pascal Информатика 1 курс. Вычислить сумму S с заданной точностью E
https://www.cyberforum.ru/ free-pascal/ thread178157.html Написать в Паскале Заранее огромное спасибо! |
Free Pascal Линейный алгоритм Помогите, уважаемые знатоки, девушке, начинающему програмисту, сложить программу по таким данным: Линейный алгоритм. Логические типы данных . Логической переменной Pole присвоить значение true, если поля (Hor1,ver1) и (Hor2,ver2) шахматной доски имеют одинаковый цвет (Hor1,ver1,hor2,ver2) – целие от 1 до 8 Я долго думала,но не смогла решить, вся надежда теперь на вас! Буду вам очень... |
Free Pascal Сортировка двумерного массива (3 однотипных). 1) В матрице M x N переставить столбцы таким образом, чтобы получилась последовательность t1<t2<…<tn, где tj – максимальное значение среди всех элементов j – ого столбца. 2) В матрице M x N переставить строки таким образом, чтобы получилась последовательность h1<h2<…<hm, где hi – количество положительных элементов в i – ой строке. 3) В матрице M x N переставить строки таким образом, чтобы... https://www.cyberforum.ru/ free-pascal/ thread178054.html |
Free Pascal лаба по одномерным массивам не могу решить эту часть программы... В массиве целых чисел найти все числа, в десятичной записи которых нет повторяющихся цифр. https://www.cyberforum.ru/ free-pascal/ thread178048.html |
Решить уравнение на отрезке с точностью E Free Pascal Решить уравнение: Cos(2/x)-2sin (1/x)+1/x=0 на отрезке с точностью E. A=-3.14; B=3.14;h=0.2; E=0.0001 |
Free Pascal Не записывается в файл
https://www.cyberforum.ru/ free-pascal/ thread177939.html Помогите отладить чтобы всё работало. в модуле заданы функции задаём интервалы a и b(границы по х), m-число точек, вычислить xi=a+h*i, где i от 0 до m, где h=(a-b)/n в текстовый файл занести xi и f(xi). Текст модуля unit functii; interface type Func=function(x:real):real;//объявим тип - функция для процедуры |
Free Pascal Вращение многогранника Задача: Написать программу для изображения многогранника, вращающегося вокруг оси ОУ. Ось вращения не должна совпадать с собственной вертикальной осью фигуры При выполнении этого задания необходимо реализовать алгоритм удаления невидимых линий. Все грани рисовать закрашенными различными цветами. Проблема с закрашиванием граней. uses crt, graph; var j : integer; Gd, Gm: Integer; https://www.cyberforum.ru/ free-pascal/ thread177888.html |
Работа с файлами - код не компилируется Free Pascal type book=record Name,Page,Year,Creator,Publish,Genre,FullName:string; end; TFile=file of book; var bibl:array of book; fil:TFile; i,n:integer; Подскажите почему компилятор не пропускает TFile=file of book;? |
Free Pascal error
https://www.cyberforum.ru/ free-pascal/ thread177747.html в общем то имеется код программы не суть важно что кодировка не подходит program NeBu; var a:array of char; i,n,k,j,b:integer; x,bukva:char; begin writeln('‚ўҐ¤ЁвҐ бва®Єг'); read(x); b:=0; |
Почетный модератор
64300 / 47595 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
|
|
19.10.2010, 08:14 | 0 |
Напишите программу, которая поможет выйграть - найдет наименьшее натуральное число с произведением цифр, равным N. - Free Pascal - Ответ 103942519.10.2010, 08:14. Показов 6543. Ответов 10
Метки (Все метки)
Ответ
Vicodin, А вы сами понимаете что написано?
Нужно найти Тогда при чем здесь А и В? Вернуться к обсуждению: Напишите программу, которая поможет выйграть - найдет наименьшее натуральное число с произведением цифр, равным N. Free Pascal
0
|
19.10.2010, 08:14 | |
Готовые ответы и решения:
10
Составить программу, которая по заданным натуральным числам N и S найдет наименьшее число, большее N, сумма цифр которого равна S Составить программу, которая по заданным натуральным числам N и S найдет наименьшее число, большее N, сумма цифр которого равна S Найдите наименьшее натуральное число такое, что при вычеркивании цифр можно получить числа с данным произведением цифр Создать программу, которая найдет наименьшее число, который взаимное простое число с 60 и больше, чем введенное число |
19.10.2010, 08:14 | |
19.10.2010, 08:14 | |
Помогаю со студенческими работами здесь
0
Напишите программу, которая запрашивает натуральное число N (1≤N≤109), и выводит S -- сумму цифр этого числа Напишите программу которая создает массив размером равным 10 и заполняет каждую ячейку значением равным индекс_ячейки * 2 Дана строка целых чисел. Составить программу, которая найдет число, сумма цифр которого максимальна Дана строка целых чисел. Составить программу, которая найдет число, сумма цифр которого максимальна |