|
|
Другие темы раздела | |
Turbo Pascal Составить блок-схемы к двум программам с массивами
https://www.cyberforum.ru/ turbo-pascal/ thread2238113.html program HelloWorld; var Mas:array of Integer; var size,i,sum: integer; begin sum:=0; writeln('Введите размерность массива '); readln(size); SetLength(Mas, size+1); randomize; for i:=1 to size do |
Вывод на экран графика любой функции, представляющей собой многочлен не выше 5-ой степени Turbo Pascal Написать программу, способную выводить на экран график любой функции, представляющей собой многочлен не выше 5-ой степени. |
Turbo Pascal Что за ошибка Должно было выдать последовательность Фибоначи https://www.cyberforum.ru/ turbo-pascal/ thread2238022.html | Turbo Pascal Метод перебора с возвратом (2) Дано n (n<=30) кошельков, пронумерованных числами 1, 2, 3, ..., n. Кошелек с номером i, (i = 1, 2, 3, ..., n), содержит mi монет одного и того же достоинства Vi. Напишите программу, которая выводит на экран, если это возможно, один из способов выплаты суммы S ровно p монетами, взятыми из рассматриваемых кошельков. https://www.cyberforum.ru/ turbo-pascal/ thread2237978.html |
Turbo Pascal Метод перебора с возвратом Рассмотрим множество B={b1, b2, ..., bn}, содержащее первые n букв латинского алфавита. Напишите программу, основанную на методе перебора с возвратом, которая вычисляет всевозможные подмножества Bi, Bi ⊆B, содержащие ровно по q букв. Указание. Каждое подмножество Bi может быть представлено характеристическим вектором X = ||xk||n, где xk=1, если bk ∈ Bi ; xk=0, в противном случае. ... |
Turbo Pascal Использование стека для загрузки данных из текстового файла
https://www.cyberforum.ru/ turbo-pascal/ thread2237489.html Задание:используя стек напечатать содержимое текстового файла выписывая литеры каждой его строки в обратном порядке. Объясните пожалуйста строки кода с помощью комментариев. Как сделать так, чтобы данные выводились в правильном порядке, но слова менялись местами, с конца к началу? Program MordovskihK; Type EXST = ^ST; ST = record Data :string; Next : EXST; |
Turbo Pascal Решение уравнения методом Ньютона
https://www.cyberforum.ru/ turbo-pascal/ thread2237327.html Помогите решить уравнение F(х)=(х^3) - 6*(х^2) + 3*х + 11 На промежутке Х0 (икс нулевое) = -2 Е (точность) = 0.001 Ответ вывести в таблицу: Номер итерации (первый столбик) начиная с 0. Хk (икс катая т.е. номер). Х(k+1) - Хk. F(Xk) F'(Xk) X(0) = 5 ... |
Turbo Pascal Как ввести числа в одну строку? Был дан ответ в виде следующих строк: 8, 9, 10, 11, 13. Строку 12 пришлось добавить, но программа не сработала. Вот программа с вашими строками: 1. uses Crt; 2. Var a: Real; 3. c, i: Integer; 4. begin 5. ClrScr; 6. WriteLn(' Ввод чисел:'); 7. c:= 0; |
Turbo Pascal Почему при переменной "а" типа Integer или Byte программа отказывает
https://www.cyberforum.ru/ turbo-pascal/ thread2237203.html uses Crt; Var a: Real; begin C;rScr; a:= 200; While a >= 0 do begin WriteLn(' Число = ' , a : 6 : 3); a:= a – 20; end; ReadLn |
Turbo Pascal Программа, когда не требуется вводить никакие типы переменных uses Crt; begin ClrScr; WriteLn(' Разница = ' , 9 000 000 – 1 000); WriteLn(' Результат R = ' , 1 000 / 3 :2 : 2); WriteLn(' Корень из R = ' , Sqrt(1000/3 : 2 : 2); ReadLn end. На выходе имеем: Разница = 8 999 000 https://www.cyberforum.ru/ turbo-pascal/ thread2237202.html |
Генерация размещений (описать процесс в строках) Turbo Pascal Помогите описать процесс п.п.3.3 который описан в 28 и 29 строках программы (не могу правильно сформулировать). program lab; uses crt; var n, k: integer; type t_razm = arrayof byte; var a: t_razm; |
Turbo Pascal Корень уравнения методом половинного деления
https://www.cyberforum.ru/ turbo-pascal/ thread2236933.html Нужно составить программу, которая решает уравнение 5*x^2 - 6*x - 3 (F(x)=0) методом половинного деления. Известно, что x принадлежит промежутку . С точностью , которую вводит пользователь. Вывести в файл в виде таблицы. Буду очень благодарен) |
Модератор
|
|||||||||||
18.05.2018, 10:05 | 0 | ||||||||||
Найти максимальный и минимальный среди всех элементов двух строк заданной матрицы, которые упорядочены по убыванию - Turbo Pascal - Ответ 1240023818.05.2018, 10:05. Показов 1985. Ответов 4
Метки (Все метки)
Ответ Код
A.PAS(55): Error 85: ";" expected. Сортировка строк матрицы:
Кликните здесь для просмотра всего текста
Вернуться к обсуждению: Найти максимальный и минимальный среди всех элементов двух строк заданной матрицы, которые упорядочены по убыванию Turbo Pascal
0
|
18.05.2018, 10:05 | |
Готовые ответы и решения:
4
Найти минимальный среди элементов тех строк, которые упорядочены либо по возрастанию, либо по убыванию Найти минимальный среди модулей всех элементов тех столбцов матрицы,которые строго упорядочены Найти максимальный элемент среди тех строк матрицы, которые упорядочены Найти минимальный среди элементов тех строк матрицы, которые упорядочены либо по возрастанию, либо по убыванию |
18.05.2018, 10:05 | |
18.05.2018, 10:05 | |
Помогаю со студенческими работами здесь
0
Найти минимальный среди элементов тех строк матрицы, которые упорядочены Найти максимальный среди отрицательных элементов прямоугольной матрицы и минимальный среди положительных Найти минимальный среди максимальных элементов строк матрицы Найти минимальный среди максимальных элементов строк матрицы и добавить его к максимальному по ABS элементу матрицы |