|
|
Другие темы раздела | |
PascalABC.NET Подсчитать количество слов в тексте, найти повторы и заменить их на вводимые пользователем слова Вот у меня есть код Нужно чтобы о подсчитывал кол-во всех введенных слов,я что только не пытался делать...все без результата. Помогите пожалуйста) program Program2; uses crt; var crk: string; a: array of string; q, w, index1, index2: integer; https://www.cyberforum.ru/ pascalabc-net/ thread1983636.html |
Даны три массива. Заменить в каждом элементы с чётными индексами на значение последнего элемента в массиве PascalABC.NET Добрый день форумчане, кто знает как делать, помогите решить. Благодарю заранее) Даны три массива. Заменить в каждом элементе с чётными индексами на значение последнего элемента в массиве.Вывести эти массивы на печать. |
PascalABC.NET Даны три слова одинаковой длины, вывести их в алфавитном порядке Добрый день форумчане, кому не сложно помогите решить, буду при много благодарен: Даны три слова одинаковой длины начинающиеся на буквы 'A', 'B', 'K' в любом порядке следования. Вывести в алфавитном порядке. Заранее спасибо) https://www.cyberforum.ru/ pascalabc-net/ thread1983528.html |
PascalABC.NET Заменить нулями все элементы матрицы, расположенные на главной диагонали и выше нее
https://www.cyberforum.ru/ pascalabc-net/ thread1983523.html Дана действительная квадратная матрица D(4,4). Заменить нулями все ее элементы, расположенные на главной диагонали и выше нее. _______________ Просьба не ссылаться на другие примеры) Спасибо за помощь |
PascalABC.NET Одномерные числовые массивы pascalabc Указание: для каждой задачи создайте алгоритм и программу. Заполните одномерный числовой массив N(14) случайным целыми числами в интервале . Выведите значения элементов массива сначала в столбик, а затем в строку, причём на каждый элемент отведите 4 позиции. Ответ каждой задачи следует выводить с новой строки и с пояснительным текстом. Кроме того, следует каждый раз производить вывод... |
PascalABC.NET Как найти номер символа в множестве a.z?
https://www.cyberforum.ru/ pascalabc-net/ thread1983413.html foreach x in 'a'..'z' do Есть переменная n, которая с каждой итерацией увеличивается на 1 (изначально n =0). Как остановиться на том элементе множества, который совпадет с x? |
PascalABC.NET График для квадратного уравнения Нужно сделать код для создания графика для этого уравнения program P1; uses GraphABC; var a, b, c, d, x1, x2: real; begin readln(a, b, c); d:= b * b - 4 * a * c; if d >= 0 then begin if d <> 0 then begin x1 := (-b + sqrt(d)) / 2 * a; https://www.cyberforum.ru/ pascalabc-net/ thread1983398.html |
PascalABC.NET Блок-схема для программы сделайте блок схему пожалуйста program lab; var x,y,num:integer; begin write('Введи значение x: '); readln(x); while (num <= 0) or (num > 3) do begin writeln('Выбери желаемую функцию: '); |
PascalABC.NET Переделать с оператором for вот с другим оператором: begin var n := ReadlnInteger('n = '); writeln(Range(n, 2*n).Aggregate(BigInteger(1), (a, b) -> a * sqr(b))); end. ЗАДАНИЕ ПОД БУКВОЙ б вот задание в миниатюре: https://www.cyberforum.ru/ pascalabc-net/ thread1983358.html |
PascalABC.NET Type, массив в массиве, задача
https://www.cyberforum.ru/ pascalabc-net/ thread1983291.html Получить список тех учителей школы, которые преподают математику и информатику, указать стаж работы и недельную загрузку. Всего 30 учителей, стаж работы 0-40 лет, недельная нагрузка 1-36. Выполнить задание через Type 'название'= record, так же использовать несколько массивов. Как примерно должна выглядеть решение на примере другой задачи : program www; Type res=record; fam:string;... |
PascalABC.NET Построить эпициклоиду, заданный функцией Все написал, весь код, но потом стал выходить ошибка нельзя преобразовать тип реал к интегер(в строчке 15).Помогите исправить, заранее спасибо. Вот код: uses graphABC; var a,R,x,y:integer; t:real; begin write('Введите A = '); readln(a); write('Введите R = '); readln(R); clearwindow; |
PascalABC.NET Решает ли эта программа данную задачу Есть задача: Методом Эйлера и методом Рунге-Кутта с точностью 0,001 решить дифференциальное уравнение вида y'=f(x,y) на интервале сзаданным начальным условием y(a). Определить метод, решающий поставленную задачу за минимальное число повторений. Построить график полученной функции на заданном интервале. Решить поставленную задачу с использованием функций и процедур языка Pascal. Заданная... https://www.cyberforum.ru/ pascalabc-net/ thread1983068.html |
1755 / 1347 / 1407
Регистрация: 28.10.2016
Сообщений: 4,267
|
|
18.05.2017, 21:11 | 0 |
Hайти первое отрицательное значение функции (с использованием функции и процедуры) - PascalABC.NET - Ответ 1045218218.05.2017, 21:11. Показов 767. Ответов 5
Метки (Все метки)
Ответ
Как только встречается отрицательный - выводить это значение и выходить из цикла через break
Вернуться к обсуждению: Hайти первое отрицательное значение функции (с использованием функции и процедуры) PascalABC.NET
0
|
18.05.2017, 21:11 | |
Готовые ответы и решения:
5
Составить программу, которая определяет первое отрицательное значение функции y= x - sin x на заданном интерва Вычислить значение выражения с использованием функции или процедуры Получить значение выражения с использованием функции или процедуры Поменять местами наибольшее и наименьшее значение массива с использованием процедуры и функции |
18.05.2017, 21:11 | |
18.05.2017, 21:11 | |
Помогаю со студенческими работами здесь
0
Нахождение значения функции с использованием процедуры или функции Найти значение функции, используя процедуры и функции Процедуры и функции: вычислить значение составной функции Рассчитать значение функции y=f(x) при некотором значении «х» с использованием представления функции в виде ряда |