Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal Вычислить значение выражения https://www.cyberforum.ru/ pascal/ thread1337543.html Вычислить , z=(s1+s2)/(k1*k2), где s1 и k1 – сумма и количество положительных элементов массива X(N); s2 и k2 – сумма и количество положительных элементов массива Y(M) M ≤50 N ≤50	Pascal Определить Y с точностью до члена ряда, меньшего eps Пожалуйста помогите решить задачу по Паскалю, задача на цикл...... Дано \|x\|\leq 1\ ;\ \ Y=x-\frac{x^3}{3}+...+(-1)^n\,\frac{x^{2n-1}}{2n-1}+... Определить Y с точностью до члена ряда, меньшего ε.
Pascal Описать процедуру line40(t), которая считывает из файла S литер https://www.cyberforum.ru/ pascal/ thread1337513.html описать процедуру line40(t), которая считывает из файла S литеры до первой первой точки и записывает их(без точки) в текстовый файл t, формируя в нем строки по 40 литер, если среди них нету точки.(Паскаль)Помогите пожалуйста((((((	Pascal Описать логическую функцию, проверяющую, упорядочены ли по возрастанию элементы непустого файла Type row = file of 0..999. описать логическую функцию, проверяющую, упорядочены ли по возрастанию элементы непустого файла.(Паскаль) Помогите пожалуйста ((( https://www.cyberforum.ru/ pascal/ thread1337510.html
Pascal Отсортировать столбцы матрицы по убыванию дана целочисленная прямоугольная матрица. 1) отсортировать столбцы матрицы по убыванию количества элементов меньших элементов побочной диагонали. 2) определить минимальный из максимальных элементов строк и его положение.(Паскаль)Помогите пожалуйста(((	Pascal Вычислить среднее арифметическое отрицательных нечетных элементов массива https://www.cyberforum.ru/ pascal/ thread1337501.html В одномерном массиве, состоящим из n элементов, вычислить: 1)Среднее арифметическое отрицательных нечетных элементов массива; 2)Cумму элементов массива, расположенных за вторым нечетным положительным элементом. сжать массив, удалив из него все элементы, модуль которых не превышает 1. Новый массив не заводить.(Паскаль). Спасайте (((
Pascal Файлы. Все элементы меньшие восьми возвести в третью степень Помогите , пожалуйста, с программой Ввести файл F . Все элементы меньшие восьми возвести в третью степень. Файл вывести до и после преобразования. Вот, что у меня получилось, Но не выводит числа в третью степень. program ABC; var b,i:integer; f:file of integer; begin assign(f,'f.dat'); writeLn('введите первую компоненту файла f'); https://www.cyberforum.ru/ pascal/ thread1337494.html	Напечатать в алфавитном порядке все согласные буквы, которые не входят ни в одно слово Pascal Дана непустая последовательность слов из строчных русских букв, меду соседними словами-запятая,за последним словом - точка. Напечатать в алфавитном порядке все согласные буквы, которые не входят ни в одно слово.(Паскаль)
Pascal Вывести номера строки и столбца какой-нибудь седловой точки или число 0, если такой точки нет Процедуры и функции на использовать. Задан числовой массив A размером N × M. Некоторый элемент этого массива называется седловой точкой, если он является одновременно наименьшим в своей строке и наибольшим в своём столбце. Вывести номера строки и столбца какой-нибудь седловой точки или число 0, если такой точки нет. https://www.cyberforum.ru/ pascal/ thread1337410.html	Pascal Одномерные массивы-Нули Помогите,исправить программу,выдаёт ошибку : Невозможно присвоить константному объекту const n = 10; x: array of integer =( 1, 2, 0, 4, 5, 0, 0, 7, 8, 9); var i, j: integer; numzero: integer; begin numzero := 0; https://www.cyberforum.ru/ pascal/ thread1337388.html
Баланс открывающихся и закрывающихся скобок Pascal Проверить, имеются ли в заданном тексте баланс открывающихся и закрывающихся скобок.	Pascal Реализовать программу "Анкета" через параметры процедуры https://www.cyberforum.ru/ pascal/ thread1337111.html program tipizirovannye_parametry; const n=3; type anketa=record {фио , год рождения , должность можно записать в одну строку} fio: string; {Фамилия Имя Отчество} god:integer; {Год рождения типа integer , чтобы мы могли ввести год рождения , что нельзя сделать с типом byte,например} dol: string; {Должность} end;

Dadni

0 / 0 / 0

Регистрация: 21.12.2014

Сообщений: 17

Pascal - комментарии к программе - Pascal - Ответ 7019777

21.12.2014, 23:51. Показов 563. Ответов 2

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

пожалуйста, помогите с коментариями, сам не успеваю написать, очень мало времени, еще надо готовиться к другим зачетам((

Pascal

var q,r,b,c,d,x0,x1,xn:real;
    n,i:integer;
begin
  writeln('Введите q,r,b,c,d,n');
  readln(q,r,b,c,d,n);
  x0:=c;
  x1:=d;
  xn:=q*x1+r*x0+b;
   for i:=3 to n do
    begin
      x0:= x1;
      x1:= xn;
      xn:=q*x1+r*x0+b;
    end;
   writeln('Результат = ',xn);
end.

Задача:
Пусть x₀ = c; x₁ = d; x_k = qx_k-1 + rx_k-2 + b; k = 2, 3, ..., n.
Даны действительные q, r, b, c, d, натуральное n>1.
Получить x_n

Вернуться к обсуждению:
Pascal - комментарии к программе Pascal

Следующий ответ

Заказать работу у эксперта

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

21.12.2014, 23:51

Готовые ответы и решения:

Комментарии к программе
напишите что происходит в этой программе пошагово Var s,sl,min:string; Begin ...

Комментарии к программе.
программа разворачивает квадратную матрицу против часой стрелки на 90 градусов,пожалуйста помогите...

комментарии к программе
помогите как правильно оформить задачу комментариями для сдачи.. program text; var s:string;...

Написать комментарии к программе.
Народ помогите плз напишите коментарии к проге все если можно program trianglepascal; uses crt;...

	21.12.2014, 23:51

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

21.12.2014, 23:51

Помогаю со студенческими работами здесь

Напишите, пожалуйста, комментарии к программе
Напишите пожалуйста комментарии program task_4; var a:integer; // ваш комментарий. зачем эта...

Написать комментарии к готовой программе
Сам сделать не могу,зато нашел сделанную. Но без комментариев не сдать.. Даны действительные...

Написать описание и комментарии к программе
var x1,y1,x,y:real; s,r:real; begin readln(x,y); readln(x1,y1); if(y<=sqrt(4-sqrt(x))) then...

Напишите пожалуйста комментарии к программе
program task_3; var k:integer; // ваш комментарий. зачем эта переменная k1:integer; // ваш...

Новые блоги и статьи
Какой язык программирования лучший для разработки нейронных сетей InfoMaster 20.01.2025 В современном мире технологий искусственные нейронные сети становятся неотъемлемой частью множества инновационных решений, от распознавания речи до автоматического управления транспортными. . .	Как подключить JavaScript файл в другом JavaScript файле InfoMaster 20.01.2025 В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .	Как откатить изменения в исходниках, не внесенные в Git InfoMaster 20.01.2025 При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .	В чем разница между px, in, mm, pt, dip, dp, sp InfoMaster 20.01.2025 В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .	Как изменить адрес удалённого репозитория (origin) в Git InfoMaster 20.01.2025 В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .	Как переместить последние коммиты в новую ветку (branch) в Git InfoMaster 20.01.2025 При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .
Как вернуть результат из асинхронной функции в JavaScript InfoMaster 20.01.2025 Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .	Какой локальный веб-сервер выбрать InfoMaster 19.01.2025 В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .	Почему планшеты и iPad уже не так популярны, как раньше InfoMaster 19.01.2025 Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .	Как самому прошить BIOS ноутбука InfoMaster 19.01.2025 BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .	Какой Linux выбрать для домашнего компьютера InfoMaster 19.01.2025 Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .	Как объединить два словаря одним выражением в Python InfoMaster 19.01.2025 В мире программирования на Python работа со словарями является неотъемлемой частью разработки. Словари представляют собой мощный инструмент для хранения и обработки данных в формате "ключ-значение". . . .

Наверх