|
|
| Другие темы раздела | |
| PascalABC.NET Как построить алгоритм поиска в записях Дано задание сделать БД из записей с данными о кафе(название, улица и тд), оформить в виде приложения Windows и сделать поиск по улице и названию. Вопрос - как построить алгоритм поиска в записях? Фрагмент объявления записей: uses FormsABC; type cafe=record name,street:string; quality:'1'..'5'; odate:integer; end; var l:array of cafe; https://www.cyberforum.ru/ pascalabc-net/ thread1419306.html |
Ввести массив из 10 вещественных чисел. Вставить в него нули после максимального и минимального элементов PascalABC.NET Ввести массив из 10 вещественных чисел. Вставить в него нули после максимального и минимального элементов. Полученный новый массив вывести на экран. |
| PascalABC.NET Ввести массив из 14 целых чисел. Удалить из него элементы, значения которых находятся в диапазоне от 0 до 7 Ввести массив из 14 целых чисел. Удалить из него элементы, значения которых находятся в диапазоне от 0 до 7. Найти произведение оставшихся чисел. Полученный новый массив и произведение вывести на экран. https://www.cyberforum.ru/ pascalabc-net/ thread1419256.html |
PascalABC.NET Ввести массив из 12 целых чисел. Найти первое значение элемента, равное нулю и упорядочить массив
https://www.cyberforum.ru/ pascalabc-net/ thread1419255.html Ввести массив из 12 целых чисел. Найти первое значение элемента, равное нулю и упорядочить массив по возрастанию элементов, начиная с элемента, следующего за нулевым элементом массива. Полученный массив вывести на экран. |
|
PascalABC.NET Определить просроченный товар, если дан срок хранения, дата выпуска, текущая дата Определить просроченный товар, если дан срок хранения, дата выпуска, текущая дата. Надо к дате выпуска прибавить срок хранения. И от текущей даты отнять результат. Не знаю как написать в записях |
PascalABC.NET Написать цикл, который выводит слово в столбик
https://www.cyberforum.ru/ pascalabc-net/ thread1419123.html В этой программе нужно написать цикл, который выводит это самое короткое слово в столбик program qq; var st, st1, min: string; i,min1: integer; begin writeln('Введите предложение'); readln(st); st1 := st + ' '; while( st1 = ' ') do |
| PascalABC.NET Ввести с клавиатуры массив А из 11 целых чисел. Из этого массива образовать массив В Ввести с клавиатуры массив А из 11 целых чисел. Из этого массива образовать массив В, у которого B = A, B = A, а остальные элементы являются средним арифметическим из трех элементов массива А: предыдущего, текущего и следующего. Вывести оба массива на экран: в первой строке – массив А, во второй строке - массив В. https://www.cyberforum.ru/ pascalabc-net/ thread1418992.html |
Сделать ввод данных с типом record. Не считываться String PascalABC.NET Доброго времени суток. У меня такая проблема. Пытаюсь сделать ввод данных с типом record type DB = record Name: string; {Проблема тут} Cont: integer; end; var kas: array of DB; i,j,n: integer; begin for i:=1 to 3 do |
|
PascalABC.NET Скопировать из первого файла во второй все строки, длина которых больше 1 символа
https://www.cyberforum.ru/ pascalabc-net/ thread1418913.html Написать программу, открывающую один текстовый файл (file1.txt) на чтение, и другой текстовый файл (file2.txt) на запись. Программа должна копировать из первого файла во второй все строки, длина которых больше 1 символа, переворачивая эти строки задом наперёд. Например, если исходный файл имел вид: алгебра полиномов инициализация 2-мя способами - полиномом - двумя массивами Операции: |
PascalABC.NET Программа-раскраска: идеи реализации Как создать программу-раскраску в паскале? (просто хотя бы общую идею) https://www.cyberforum.ru/ pascalabc-net/ thread1418840.html |
|
PascalABC.NET Вывести текстовый файл на принтер Программа должна выводить текстовый файл на принтер. var s: string; str:char; p,sum: real; n: integer; begin var f,outf: text; Assign(f, 'nevemo.txt'); |
PascalABC.NET Вывести на экран процент выполнения программы я написал программу (см. ниже). как сделать так, чтобы во время своих вычислений программа печатала на экране процент завершения выполнения всех операций? P.S. эта программа находит вероятность "выпадания" чисел от 1 до 10. Program proverka; uses crt; var i, Chislo, K, Kolvo, i2 :int64; Nomer1, Nomer2, Nomer3, Nomer4, Nomer5, Nomer6, Nomer7, Nomer8, Nomer9, Nomer10 :integer; Answer... https://www.cyberforum.ru/ pascalabc-net/ thread1418784.html |
|
0 / 0 / 0
Регистрация: 04.12.2014
Сообщений: 16
|
|
| 0 | |
Вычисление наименьшего общего кратного элементов массива до первого нулевого элемента - PascalABC.NET - Ответ 747143112.04.2015, 22:02. Показов 1555. Ответов 1
Метки (Все метки)
Вернуться к обсуждению: Вычисление наименьшего общего кратного элементов массива до первого нулевого элемента PascalABC.NET
0
|
|
| 12.04.2015, 22:02 | |
|
Готовые ответы и решения:
1
Вычисление наименьшего общего кратного минимального и максимального элемента в массиве
|
| 12.04.2015, 22:02 | |
| 12.04.2015, 22:02 | |
|
Помогаю со студенческими работами здесь
0
Составить программу для нахождения наибольшего и наименьшего общего делителя и наименьшего общего кратного двух натуральных чисел Рекурсивное вычисление наименьшего общего кратного двух целых чисел Функция: вычисление наименьшего общего кратного без использования стандартных функций Нахождение наибольшего общего делителя и наименьшего общего кратного двух натуральных
|