Форум программистов, компьютерный форум, киберфорум

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


КиберФорум - форум программистов и системных администраторов. Бесплатная помощь в решении задач по программированию, математике, физике и другим наукам, решение проблем с компьютером, операционными системами.
Войти
Регистрация
Восстановить пароль

Темы раздела Pascal (Паскаль)

Тест по Паскаль
Подскажите пожалуйста%-) 1)В паскаль-программе описан массив Var z: array of integer; Укажите вариант ответа, в которых верно использован оператор присваивания. Выберите один ответ: z:=17...

Опишите структуру, показанную на рисунке, пользуясь словесными выражениями, например: “a подразделяется на b и c”
Опишите структуру, показанную на рисунке, пользуясь словесными выражениями, например: “a подразделяется на b и c” Написать на Pascal

Вывести трёхзначные числа, произведение цифр которых равно корню числа, составленного из первых двух цифр числа
Напишите алгоритм, который выводит все трёхзначные числа, произведение цифр которых равно корню числа, составленного из первых двух цифр исходного числа. При составлении числа из двух цифр порядок...

Компиляция не произошла из-за следующих ошибок паскаля
program Lab; uses SysUtils; var a: Integer; function w(y: Integer): Integer; begin

Составить программу, вычисляющую 1) скалярное, 2) векторное, 3) смешанное произведения векторов
Составить программу, вычисляющую 1) скалярное, 2) векторное, 3) смешанное произведения векторов, заданных своими координатами. На Pascal или C++ используя функции или процедуры (обязательно)

Упорядочить каждые третьи элементы последней трети массива по возрастанию обратных значений
Упорядочить каждые третьи элементы последней трети массива по возрастанию обратных значений

Вычислить интеграл по формуле правых прямоугольников
Вычислить интеграл по формуле правых прямоугольников с точностью 10-5. \int_{0}^{1}\operatorname{ch}x^2\operatorname{d}x

Код в Паскаль
Помогите пожалуйста, почему-то не работает(( unit unitKR; interface Type TPoint = Object x, y: integer; color: integer; visible: boolean;...

Вывести перестановки по заданному условию
Сформировать одномерный массив и вывести перестановки при условии, что если элемент больше соседних в два и более раз, то такая перестановка не подходит. Массив есть, перестановки есть, а вот как...

Файл с данными не сохраняется
Доброго времени суток, При выборе номера 2(вывод в файл), файл создается временный , но не сохраняется program project1; uses sysutils; type tf=textfile; gora=record

Main.pas(13,25) Fatal: Syntax error, "DO" expected but "identifier STEP" found
program CodeTranslation; uses SysUtils, Math; var p, q: Integer; m: Double; begin p := 2;

Определение точки в пространстве по заданным координатам
Здравствуйте, подскажите пожалуйста, почему программа неверно выводит данные о положении точки по вводимым координатам. Кроме того, иногда вместо окна вывода вылезает Form1, как этого избежать?...

Рассматривается множество целых чисел, принадлежащих числовому отрезку [2807; 8558]
Рассматривается множество целых чисел, принадлежащих числовому отрезку (2807; 8558), которые удовлетворяют следующим условиям: - запись в двоичной системе заканчивается на 11; - запись в...

Ошибка
program CodeTranslation; uses SysUtils, Math; const m = 5; p = 2; var

Не работает компилятор Паскаль в сайте
каждый раз задают домашнюю задание информатика, и я решил что бы быстрей её делать, с онлайн печатать, и выводить ответ. Тоесть, я пишу это ...

Написать функцию, подсчитывающую количество слов в списке, которые начинаются с той же буквы, что и следующее слово
Пытался написать с функцией, но получилось только так. Сделайте пожалуйста с функцией. type PList = ^TList; TList = record sl: string; byk:string; Next: PList; end; var Head,...

Найти одномерные плотности вероятности случайных величин ξ и η
Совместная плотность вероятности двух случайных величин ξ и η равномерна в пределах области Q, изображенной на рисунке, и равна нулю за ее пределами. Найти одномерные плотности вероятности случайных...

Найти номера минимального и максимального элементов массива
Дан массив Xi, i = 1, 2, …, 15. Найти номера минимального и максимального элементов массива. Определить, какой из них лежит ближе к началу массива

Есть список игрушек, некоторые из которых имеются в N детских садах. Определить игрушки из списка:
Есть список игрушек, некоторые из которых имеются в N детских садах. Определить игрушки из списка: • которых нет ни в одном из детсадов; • которые есть в каждом из детсадов.

Составить блок схему алгоритма и программу для вычисления функции по формуле
Здравствуйте. Подскажите пожалуйста ,как cоставить блок схему алгоритма и программу для вычисления функции по формуле для произвольных исходных данных, с двойной точностью: t=\sqrt{\left|12\pi...

Рекурсия на Паскале
Алгоритм вычисления значения функции F(n), где n – целое неотрицательное число, задан следующими соотношениями: F(n) = 3·n, если n < 3 F(n) = F(n – 2)·F(n – 1) - n, если n > 2 и число n чётное,...

Вычислить интеграл
Нужно написать программу на Паскаль, которая вычисляет интеграл. Важно: нельзя использовать готовые функции, по типу break, exit,и тп. Нужно написать через процедуры и функции.

Создание множества содержащего знаки препинания из непустой последовательности символов
Дана непустая последовательность символов. Требуется построить и напечатать множество, элементами которого являются встречающиеся в последовательности: знаки препинания; на pascal нужно использовать...

Вычислить предел последовательности
Вычислить предел последовательности an c точностью 0.5∙10–5, если значения a0, x вводятся. Значения an считать по правилу an = 8-cos(3+(an-1)2)/2n

Усложненный калькулятор, помощь с кодом (довести его до конца)
Всем добрый вечер, нужна ваша помощь). Как-то дальше код не идёт. С чем нужна помощь: 1) Нужно сделать, чтобы при операциях с матрицами система считывала следующие число после A и B, и присваивала...

Определить номер первого среди элементов последовательности an, удовлетворяющих условию an< b
Определить номер первого среди элементов последовательности an, удовлетворяющих условию an< b. Значения an считать по правилу an = 1 / (n2 + 1); значение b ввести.

Вычислить определенный интеграл
где f x( ) равно sin(x)

Нужно исправить код для задачи
Решаю первую часть задачи - " Рассмотрим последовательность 110100100010000..., в которой выписаны подряд степени числа 10. Цифры в этой последовательности нумеруются слева направо, начиная с...

Определить, сколько магических кристаллов необходимо раздобыть, чтобы получить необходимое количество больших мутагенов
Решить задачу на любом языку. Путешествуя по островам, Гарольд из Боливии встретил Гремиста, одного из лучших алхимиков, создателя активизационно-ассимилятивного метода. Выполнив несколько...

Выполнить заданные действия с одномерным массивом
Массивы 1) В одномерном массиве, состоящим из N элементов, вычислить: g. сумму отрицательных элементов массива; h. произведение элементов массива, расположенных между минимальным и...

Количество сдвоенных букв в предложении
Составить программу, которая подсчитывает количество сдвоенных букв в предложении, на языках Pascal и С++.

Вычислить определенный интеграл
где f x( ) равно cos(x)

Найти приближенное решение нелинейного уравнения методом простых итераций на заданном отрезке. Точность вычислений Е
Найти приближенное решение нелинейного уравнения методом простых итераций на заданном отрезке. Точность вычислений Е = 0.001. f (x)= x+1/(x2+1)=0 x

Вывести матрицу, в которой присутствует строка с максимальной суммой элементов
Даны три целые матрицы размера N*N. Вывести ту из них, в которой присутствует строка с максимальной суммой элементов.

Создать процедуру для вывода первых N членов арифметической прогрессии
Процедуры Сделать математическую постановку задачи, написать программу. Создать процедуру для вывода первых N членов арифметической прогрессии, заданной первым членом а и разностью d. С...

Вычислить значение выражения
Функции Найти (a! + b!)/(a+b)!, создав функцию для вычисления факториала произвольного натурального числа.

Даны три целые матрицы размера N*N
в которой присутствует максимальный элемент

Создать и заполнить символьные файлы f1 и f2 Переписать с сохранением порядка следования компоненты файлов
2. Создать и заполнить его символьные файлы f1 и f2. Переписать с сохранением порядка следования компоненты файла f1 в файл f2, а компоненты файла f2 – в файл f1. Использовать вспомогательный файл h.

Найти приближенное решение нелинейного уравнения методом простых итераций на заданном отрезке. Точность вычислений Е
Найти приближенное решение нелинейного уравнения методом простых итераций на заданном отрезке. Точность вычислений Е = 0.0001. 1-x+sinx-ln(1+x)=0, x \small \in .

Ошибка в решении
Добрый день! есть задача: В следующей программе описать запись Homme, которая используется для описания человека (поля: Имя, Отчество, Фамилия, дата рождения, пол). Создать файл типа Homme с именем...

Составьте программу вычисления суммы членов последовательности
составьте программу вычисления суммы членов последовательности {a}_{k}={\frac{k}{k^{2}+1} (k=1,2,3...n)

Гиперболические функции
Гиперболические функции определяются следующим образом

Ошибка в программе подсчёта заданных чисел последовательности
В чем ошибка? Вводится возрастающая последовательность целых, не равных нулю чисел. Ноль – признак конца ввода. Определить, сколько в ней различных чисел, кратных трём и сумма цифр которых не...

Вычислить среднее арифметическое всех положительных значений функции
Напишите код и блок схему к нему. ПОЖАЛУЙСТА Напишите программу на языке Паскаль, а также постройте блок-схему алгоритма для решения следующей задачи: Вычислить среднее арифметическое всех...

Галочка и переключатели для Inno Setup на Паскале
Добрый день. Делаю установщик. Но проблема в том, что я не знаю Паскаль совсем, к тому же учитывая нюансы для редактора Inno Setup. У меня есть программа, а к ней два дополнительных компонента,...

Неназначенный файл
Вся проблема в том, что везде где написал RESET() я указывал файловую переменную, которую ранее была в ASSIGN(). Помогите пж уже неделю стою на месте не могу ничего сделать...

[Virtual Pascal] Запуск внешнего скрипта на AutoIt с ожиданием его завершения
Есть следующий код консольной программы на Borland Delphi 7, который запускает внешний скрипт на AutoIt из папки, где находится скомпилированная программа (не из рабочей папки), с ожиданием его...

Создать программу по блок схеме

Квадратная матрица
Дана квадратная матрица, количество строк нечетное, найти центральный элемент этой матрицы, отложить от него 2 радиуса большой и поменьше и найти сумму элементов входящих в кольцо построенное...

Разработать алгоритм и программу с единственным циклом для обработки одномерных массивов

Код работает в онлайн-компиляторе, но не работает в Lazarus
Почему может не работать этот код? uses Math; var m, n, p: Integer; s: Double; begin

Замена элементов в матрице; смена столбцов
Пожалуйста, помогите с задачей: Задана матрица А размера 5*7. Заменить в нем неповторяющиеся элементы на единицы. (Блок-схема приветствуется, если не сложно)

Вычислить значение выражения
Дано: вещественные х, у. Вычислить: z = (sign х + sign y) sign(x+y)

Описать процедуру Smooth1(A, N)
Описать процедуру Smooth1(A, N), выполняющую сглаживание вещественного массива A размера N следующим образом: элемент AK заменяется на среднее арифметическое первых K исходных элементов массива A....

Сортировка чисел в текстовом файле
Как можно отсортировать текстовый файл в паскале с использованием только дополнительных файлов?

Найти значение функции Y=ΣX(I,J)
Найти значение функции Y=ΣX(I,J), где X(I,J) - элементы нечетных строк таблицы 4*13. Предусмотреть ввод таблицы и вывод результатов. Двухмерные массивы "PASCAL"

Создать и заполнить текстовый файл f Записать строки файла f в файл g в перевернутом виде
3. Создать и заполнить текстовый файл f. Записать в перевернутом виде строки файла f в файл g. Порядок строк в файле g должен a) совпадать с порядком исходных строк в файле f; b) быть обратным...

Используя метод решета Эратосфена, напечатать в убывающем порядке все простые числа из диапазона
Дано целое n от 2 до 500. Используя метод решета Эратосфена, напечатать в убывающем порядке все простые числа из диапазона n..2n.

Вычислить значения функции с использованием операторов цикла с постусловием repeat и параметром for
Вычислить значения функции с использованием операторов цикла с постусловием repeat и параметром for y=\begin{cases}\left(\frac{x}{3} \right)\cdot \ln |x|-5 & \text{ if } x\,<\,-1 \\\\ x^2 &...

Ошибка (6) : Встречено 'then', а ожидалось ';'
Доброго времени суток, не могу понять, в чем заключается ошибка, отмеченной на 6 строчке begin writeln('x':7, 'y':7, 'z':7); for var x:= false to true do for var y:= false to true do ...

Привести различные форматы даты к одному формату
Написать программу в паскале, которая бы при вводе даты рождения пользователя в любом формате выводила его в одном стандартном формате.

Сформировать новый массив на основе заданного массива
Каждый очередной элемент массива В равен наименьшему среди всех предыдущих элементов массива А для элемента массива А с тем же индексом. Массив A = Помогите плиз

Опишите структуры, показанные на рисунках
Опишите структуры, показанные на рисунках, пользуясь словесными выражениями, например: “a подразделяется на b и c” и т.д. Затем то же сделайте на Turbo Pascal: объявите каждую запись, задавшись...

Найти приближенное решение нелинейного уравнения методом простых итераций
Здравствуйте, уважаемые! Всю голову запарила, помогите решить! Найти приближенное решение нелинейного уравнения методом простых итераций на заданном отрезке. Точность вычислений Е = 0.0001 1 -...

Разработать алгоритм и программу обработки одномерных массивов, используя единственный цикл
Разработать алгоритм и программу обработки одномерных массивов, используя единственный цикл В заданном массиве X1, X2, ..., Xn заменить значения отрицательных элементов их абсолютными величинами,...

Вычислить значение выражения
Напишите код на паскале для вычисления данной формулы и входными данными

написание порограммы по формуле
Прошу помочь с решением, буду очень благодарна!!!! 1. Составить блок схему алгоритма и программу для вычисления функции по формуле: , для пример В Turbo Pascal алгоритм будет...

Вычислить значение выражения
Напишите, пожалуйста, программу на Паскаль, а то я в тупике. Задача: С клавиатуры вводятся два действительных числа х, у. Требуется написать программу вычисления значения выражения

Определить, является ли число числом Армстронга
Напишите программу, которая запрашивает у пользователя число и определяет, является ли оно числом Армстронга (число, которое равно сумме своих собственных цифр, возведённых в степень, равную...

Блок-схема
Помогите пожалуйста! Я не могу правильно составить блок-схему на Паскаль, требуется помощь по заданию: Ввести массив, состоящий из 20 элементов целого типа. Определить каких элементов больше четных...

Протабулировать функцию
Конструирование программы со структурой вложенных циклов. Z=\frac{x+2.5\times {10}^{-3}}{{x}^{2}+3.8\times...

Определить расстояние между максимальным и минимальным значениями функции в заданных точках
Цикл с предусловием. Значения функции f(x)=4x3-3x2+2x-1 определены в точках x=x0 (hx)xn. Определить расстояние между максимальным и минимальным значениями функции.

Вычислить сумму ряда
Добрый день, уважаемые форумчане. Помогите, пожалуйста, найти ошибку в программе, которая считает сумму ряда по формуле. Формулу прикрепила отдельным файлом. program Project1; uses crt; var...

Сформировать новый массив на основе заданного массива
Каждый очередной элемент массива В равен наименьшему среди всех предыдущих элементов массива А для элемента массива А с тем же индексом. Массив A =

Построить и напечатать множество
Дана непустая последовательность символов. Требуется построить и напечатать множество, элементами которого являются встречающиеся в последовательности: знаки препинания и операций отношения;

Для натурального числа n найти все его делители определить простые и составные
Для натурального числа n найти все его делители определить простые и составные нужно решить задачу на pascal

В массиве найти количество элементов, принадлежащих заданному промежутку
В массиве из 10 чисел (вводятся с клавиатуры) найти количество элементов, принадлежащих . Полученный результат вывести на экран.

Не вводит число с клавиатуры
program Hello; var a:integer; begin readln(a); writeln (a); end. Ввожу 77477 Печатает 11941

Составьте программу с использованием одномерных массивов
Использовать словарь, содержащий следующие ключи: фамилия и инициалы; номер группы; успеваемость (список из пяти элементов). Написать программу, выполняющую следующие действия: ввод с клавиатуры...

Блок схема размещение суммы положительных элементов строки с номеров k на месте максимального элемента матрицы
Есть задача. Составить блок-схему алгоритма для размещения суммы положительных элементов строки с номером k(K вводится с клавиатуры) на месте максимального элемента главной диагонали в матрице А....

Создать и заполнить целыми числами файл f Найти количество компонент по заданному критерию
1. Создать файл f, и заполнить его компоненты которого являются целыми числами. Найти: а) количество четных чисел среди компонент; b) количество удвоенных нечетных чисел среди компонент; c)...

Найти наибольшее и наименьшее значение функции в заданном интервале с заданным шагом
На Паскаль.Найти все значения функции y=sqr(x), при x<=0. y=sqrt(x), при x>0. в интервале с шагом изменения аргумента функции h = 0.1 Помогите пожалуйста

Вычислить сумму
Вычислить сумму t=a\sum_{i=1}^{10}\frac{i}{i+a^i} Для контрольного просчета принять a = 1,7.

Описать комбинированный тип
сведения о 5 персонах (фамилия, имя, отчество, пол, национальность, семейное положение, образование (высшее, среднее специальное, среднее, неполное среднее); адрес: улица, номер дома, номер...

Составить программу вычисления суммы ряда
Составить программу вычисления суммы ряда в соответствии с приведенным вариантом. Справа от знака равенства дано для контроля точное значение ряда 1 + 2 + 3 + … + n = n(n+1)/2

Табулирование функции с помощью оператора цикла с параметром
Вычислить \alpha \left\{\begin{matrix}a*sin(x), x\geq 0\\ a*ln|x|, x &lt; 0\end{matrix}\right. для x = -3(0,5)3; a = 1,35. Точку x = 0 исключить.

В массиве найти наибольший элемент и поменять его местами с первым элементом
В массиве из 15 чисел (числа вводятся с клавиатуры ) найти наибольший элемент и поменять его местами с первым элементом. Преобразованный массив вывести на экран.

Неправильно вычисляется вторая производная
Первая производная: procedure Df_dx(a,b:real;n:integer; f:TFunc; var avfx:TAvfx); var dx, x:real; i:integer; begin dx:=(b-a)/n; avfx:=(f(a+dx)-f(b))/dx; ...

Что такое div и mod?
Что такое операции div и mod?

Возведение в степень
Обьясните пожалуйста как возводить в n,n-1,n-2 и тд. степени

Как написать простейший калькулятор?
Написать программу, моделирующую простейший калькулятор. Пользователь вводит выражение типа ’6+3’ (цифра, знак операции +, цифра) и получает результат. я написал что то вроде этого: program...

Массив: Вывести массив на экран. Найти сумму элементов массива.
1. Заполнить массив А квадратами целых чисел от 1 до 100. Вывести массив на экран. Найти сумму элементов массива. 2. Дано последовательность из 10 чисел: 2, 4, 6, 8, 10, 12, 14, 16, 18, 20....

Площадь треугольника по формуле Герона
:help:Написать процедуру,которая вычислит площадь треугольника по формуле Герона S=(p*(p-a)*(p-b)*(p-c)) :help нужно на отчет:Написать процедуру,которая вычислит площадь треугольника по формуле...

Перевод из десятичной системы в двоичную
Здравствуйте! помогите пожалуйста написать программу, переводящую целые числа из десятичной системы счисления в двоичную. не могу догадаться как записыватьединицы и нули. знаю, что всё время надо...

Вывести случайное число в диапазоне 15-22
Как сделать, чтобы выводило число рандомом к примеру в диапазоне от 15..22 ?:):)

Как в Паскале записать модуль числа
Народ как в Паскале записать модуль числа например 8...........

Вычислить площадь круга
Помогите мне плиз:cry: Нужно сделать программу в паскале ''программа вычисления площади круга'' Она выглядит так.В ней нужно только исправить ошибки я сам исправил несколько но вот в 5 строчки...

Поиск минимального элемента в массиве
дан одномерный массив А. Написать программу на языке паскаль, реализующую поиск минимального элемента в массиве А. результат вывести на экран. зарание спасибо

Что означает inc?
if fl then inc(sum,a); Что означает inc?

Найти наибольшее из трёх чисел
Найти наибольшее из трёх чисел АВС.

Программы в паскале (довольно сложные, н оинтересные))
Всем доброго времени суток:) . Пытаюсь написать программы. Никак не получается. Знакомые тоже не могут написать. Поэтому решил просить помощи у вас. Это уже стал вопрос жизни без преувеличений) ...

Определить,является ли число четным или нечетным.
Добрые люди помогите пожалуйста, скоро экзамен а допуска к нему нет. Надо решить 2 задачи: 1. Дано натуральные число.Определить,является ли оно четным или нечетным. Ответ вывести в форме "четное"...

Найти сумму элементов массива
Народ помогите пожалуйста решить. срочно. 1)Дан одномерный массив. определить: а) сумму всех эллементов массива б)произведение отр. элементов в) сумму квадратов всех положительных элементов...

Найти максимальное значение с 5 введённых чисел с клавиатуры
Здравствуйте программисты! Подскажите пожалуйста, как короче можно записать алгоритм задачи. Найти макимальное из 5 чисел введённых с клавиатуры. Нам сказал препод написать программку в ещё коротком...

Дано целое число N(>0). Найти сумму 1+1/2+1/3+…+1/N (вещественное число)
Дано целое число N(>0). Найти сумму 1+1/2+1/3+…+1/N (вещественное число). Простейшая задачка, но несмотря на это, не могу вывести правильный ответ. Вот мой код: program for10; var b:...

Возведение числа в степень
помогите составить алгоритм задачи возведение числа введенного с клавиатуры в степень введенную тоже с клавиатуры используя функции

Переход на следующую строку при выводе в консоль
У меня вопрос, как перевести текст на следущую строку вот в таком случае If x=1 then write ('Вы ошиблись. вот здесь нужен переход на новую строку x=2')

Алгоритм сравнения трех чисел
Голову сломал уже. Подскажите оптимальный алгоритм сравнения трех чисел. Необходимо учесть все варианты, в том числе равенство. У меня получается не 10 сравнений, а это много.

М. Э.Абрамян Решебник
Доброго времени суток! Требуется помощь программистов-энтузиастов. Дело в том, что решил написать решебник к задачнику Абрамяна (к Programming Taskbook Электронный задачник по программированию...

Найти среднее арифметическое элементов массива.
дан массив в котором N чисел. Найти среднее арифметическое элементов массива.

Определение знака зодиака по дате рождения
Вопщем то я написал прогу, но препод говорит что она не эффективная... :( Снизу прикрепил то, что я своял Можете подсказать как сделать? Требуется определить знак зодиака в зависимости от даты...

решить строковые задания
6 Дано предложение. Вычислить процент вхождения буквы «о» в данное предложение и получить новое предложение путем увеличения данного, на полученный процент, пробелами. 7 Дана фраза определить...

Программа нахождения площади прямоугольника
Помогите пожалуйста выполнить задание по информатике:напишите программу на языке Pascal, которая будет находить периметр прямоугольника, пронумеруйте строки программы. Ничего не понимаю в этом....

вычисление площади трапеции
ребят помогите пожалуйста, решила задачу Составьте программу для вычисления площади трапеции. а она у меня не идет. подскажите где ошибка? program p2; var a,b,h,s:real; begin writeln...

Как работает функция XOR и что она делает?
Как работает функция XOR и что она делает?

Напишите программу, которая считает количество чётных цифр введённого числа
Напишите программу, которая считает количество чётных цифр введённого числа. Входные данные Входная строка содержит одно натуральной число N . Выходные данные Программа должна вывести...

Вычислить длину окружности и площадь круга одного и того же заданного радиуса R
Брату в универе нужно написать задачки по программированию (лабы) на паскале. Помогите кто знает, спасибо. 1. Вычислить длину окружности и площадь круга одного и того же заданного радиуса R.

Возведение в квадрат.
Здравствуйте, прошу помочь. Условие задачи, написать программу, которая возводит в квадрат числа от a до b, точнее требуется вот что, тест такой: a= 10 b= 20 и от 10 до 20 все числа нужно...

Решение системы линейных уравнений методом Гаусса
Доброго времени суток. Помогите решить две как мне сказали простых задачи. Нужен код. и результат. Буду очень благодарен. Задание 2. Решение системы линейных уравнений методом Гаусса ...

Программа калькулятор
Нужно написать программу-калькулятор на паскале, которая выполняет операции умножения, деления (проверяет, что делить на 0 нельзя), сложения, вычитания, вычисляет целую часть от деления и остаток. ...

Что такое clrscr?
Что такое clrscr

Задан массив из 10 целых чисел. Найти сумму элементов этого массива
ребят, вот задача, нужно ее решение, задан массив из 10 целых чисел. найти сумму элементов этого массива вот написал решение, prorgam sp; var A: array of integer; I,S: integer; begin I:=0;...

Определить, является ли треугольник равнобедренным
Дорогие ЛЮди 1. Составить программу решения разветвляющегося алгоритма, использующего простое логическое условие. Заданы стороны а, Ь, с. Определить, является ли треугольник равносторонним....

Упорядочить три числа по возрастанию.
Вот такая задачка: Составить программу упорядочивания трех чисел x, y, z по возрастанию. помогите пожалуйста

Дано трехзначное число определить количество сотен, десятков и единиц
Дано трехзначное число определить кол-во сотен,десятков и единиц.Помогите решить!

Дискриминант
Не работает программа: var a,b,c,x, D: integer; begin write('Введите a: '); readln(a); write('Введите b: '); readln(b); write('Введите c: '); readln(c);

Программа которая выводит таблицу степеней двойки ( от нулевой до десятой ) .
Здравствуйте, нужна помощь в составлении программы , которая выводит таблицу степеней двойки ( от нулевой до десятой ) . Ниже представлен рекомендуемый вид экрана во время работы программы 0 1 1...

Напишите программу которая вычисляет сумму первых n натуральных чисел
напишите программу которая вычисляет сумму: первых n натуральных чисел; квадратов первых n натуральных чисел; всех четных чисел в диапазоне от 1 до n; Всех двузначных чисел.

Найти сумму нечетных чисел от 1 до n.
Нужно решить две небольшие задачки=) Пишу прмо с пары =))) 1. Найти сумму нечетных чисел от 1 до n. 2. Даны два целых числа A и B (A < B). Вывести в порядке возрастания все числа,...

В последовательности натуральных чисел определить минимальное число, кратное 3
Напишите программу , которая в последовательности натуральных чисел определяет минимальное число, кратное 3. Программа получает на вход количество чисел в последовательности, а затем сами числа. В...

Даны три действительных числа. Выбрать из них те, которые принадлежат интервалу (1,3) и найти большее из них
Даны три действительных числа. Выбрать из них те, которые принадлежат интервалу (1,3) и найти большее из них. Найти числа, которые принадлежат интервалу: Program work1; uses crt; var x,y,z:...

Дана строка, заканчивающаяся точкой. Подсчитать, сколько слов в строке
Дана строка, заканчивающаяся точкой. Подсчитать, сколько слов в строке.

Самая простая программа на Паскале
Здравствуйте, уважаемые форумчани. Помогите, пожалуйста, написать простую программу на Паскаль (именно этого языка программирования не знаю). Нужно написать программу, которая считает сколько...

Удалить из строки все пробелы
Помогите пожалуйста: надо удалить из строки все пробелы. Найти я их смог, а вот как удалить не знаю...

Как вывести результат двумерного массива на экран в виде таблицы?
как вывести результат двумерного массива на экрант в виде таблицы

Перевод из одной системы счисления в другую
Дали задание: написать программу для перевода из одной системы счисления в другую. Системы счисления задаются с клавиатуры. Т.е. Программа спрашивает В какой системе будет число. Пишу "2"...

система уравнений
решить систему уравнений на pascal

Перевод числа из десятичной системы счисления в двоичную
Здравствуйте! Пытаюсь написать программу для перевода чисел из десятичной системы счисления в двоичную. Вот, что пока написал Program Nolimit; var M:array of integer; n, Ch, Ost :...

Написать программу, которая выводит на экран цифры числа.
Дано 3-значное число n, n<=5. Написать программу, которая выводит на экран цифры этого числа. При напичании использовать только цикл for. Вот начало программы, требуется её окончание var...

Отсортировать массив по возрастанию
Решите эти задачи пожалуйста очень надо!!!! 1. Организуйте массив, содержащий 20 различных целых чисел. После этого элементы массива упорядочиваются по убыванию и содержимое отсортированного...

Что означает while not eof(f)
Что означает while not eof(f) и как описать это в блок схеме

Очень хорошая книга для начинающих!
Вот на этом сайте: http://oleg-derevenets.narod.ru/ Называется Песни о Паскале. Рекомендую!

Составить программу для нахождения наибольшего общего и наименьшего общего кратного двух натуральных чисел
составить программу для нахождения наибольшего общего и наименьшего общего кратного двух натуральных чисел НОК(A,B)=A*B/НОД(A,B)

3.1 Написать программу, которая по заданному числу (от 1 до 12) выводит название соответствующего ему месяца.
Написать программу, которая по заданному числу (от 1 до 12) выводит название соответствующего ему месяца.

Четные и нечетные элементы массива
Заполните массив длиной 20 элементов случайными целыми числами 0<=X<100. Выдайтемассив в строчку, числа через пробел. Рассортируйте числа массива на чётные и нечётные, выдайте в две отдельные строки....

Найти сумму элементов в каждой строке двумерного массива
Здравствуйте) Помогите пожалуйста решить несколько задач) Заранее огромнейшее спасибо) 1. В заданном массиве K(F;F) найдите сумму элементов в каждой строке. Сформулируйте одномерный массив ,...

Вычислить периметр и площадь прямоугольника
даны стороны прямоугольника A,B. Составить программу вычисления длины и площади прямоугольника

Три сопротивления R1,R2,R3 соединены параллельно. Найти сопротивление соединения
1.Три сопротивления R1,R2,R3 соединены параллельно. Найти сопротивление соединения. нужна помошь помогите плиз...

Ввод массива через процедуру
Почему нули выдаёт... uses crt; const n=2; m=3; type amas=array of integer; bmas=array of integer;

Заполнить массив случайными числами в заданном интервале
Заполните массив C случайными числами в интервале от 5 до 15 и вывести его на экран

Найти сумму всех четных цифр в числе
Как-то не задалось у меня с этими тремя,не получается . _ . :wall: 1.Нужно найти сумму всех четных цифр в числе. Заранее огромное спасибо:sorry:

Ввести два числа. Если А больше Б вычислить их сумму, иначе произведение
Ввести два числа. Если А больше Б вычислить их сумму, иначе произведение.

Даны три числа. Найти наименьшее из них.
Можете помочь решить вот эти задачи: 1)Даны три числа. Найти наименьшее из них. 34 45 56 34 2)Даны три числа. Найти среднее из них (то есть то число, расположенное между наименьшим и...

Построить блок-схему алгоритма для вычисления значения функции и написать программу на языке pascal
Помогите решить такую задачу Построить блок-схему алгоритма для вычисления значения функции и написать программу: Y(x,\,y)=\begin{cases}\sqrt{x+y^{\,}} & \text{, if } y\,<\,2 \\\\ (x+y)^2 &...

Как в паскале записать икс в пятой степени?
Как в паскале записать икс в пятой степени? Нам сказали, что ** - функция возведения в степень в АЯ. Я попробовала так записать в задаче, но он мне пишет - "неверное выражение".

полторы кошки за полтора часа съедают полторы мышки. Сколько мышек съедят X кошек за Y часов?
ПОМОГИТЕ ПОЖАЛУЙСТА"! Нужно сделать задание во фри паскале! полторы кошки за полтора часа съедают полторы мышки. Сколько мышек съедят X кошек за Y часов?

нарисовать простенького снеговика
нарисуйте плиз снеговика!срочно нужен

Программа , вычисляющая сумму натурального ряда чисел от 1 до N.
Помогите пожалуйста.

Время. Дано количество секунд. Вычислить время в формате часы/минуты/секунды.
Написать программу, которая требует от пользователя ввести к- секунду и чтобы программа считала сколько полных часов и минут прошло с момента начало новых суток. Если к = 0, выводить соответствущее...

Вывести на экран простые числа
Помогите пожалуйста!! Необходимо Вывести на экран (распечатать) все простые числа от 0 до r

Дано трехзначное число, найти произведение его цифр.
№1 Дано трехзначное число, найти произведение его цифр. №2 Дано натуральное число n (n<=9999), вычислите верно ли, что это число содержит ровно три одинаковые цифры, если оно записано четырьмя...

Сортировка пузырьком
Товарищи,прошу помощи. Нужно отсортировать массивчик методом пузырька. Как только не пробовал..Никак не выходит. begin for i:=1 to N do begin for j:= N to i do begin if m then

Дано двухзначное число. Найти число десятков, число единиц в нем, произведение его цифр
Помогите плиз=)) Дано двухзначное число. Найти число десятков ,число едениц в нем, произвеление его цыфр

Вывести число в обратном порядке
Нужно решить эти задачи: 1) Дано шестизначное число 'A', которое ввел пользователь типа longint. Вывести это число в обратном порядке. При выводе числа используется одна переменная. Например:...

Найти минимальный элемент массива и его номер
Помогите решить задачи по Паскаль, очень буду благодарен, а то я в этом не шарю=( 1. Найти минимальный элемент и его индекс в одномерном массиве. Все неизвестные значения вводятся с клавиатуры.

Сумма отрицательных элементов массива.
В одномерном массиве, состоящем из п вещественных элементов, вычислить: 1. Сумму отрицательных элементов массива. 2. Произведение элементов массива, расположенных между максимальным и минимальным...

Не могу ответить на тестовое задание по Паскалю
Здравствуйте мне нужна помощь от Паскаль кодеров или кто его немного знает. Есть Тест и там экий вопрос: Дан фрагмент программы, определяющий количество отрицательных элементов массива A....

Написать программу, которая запрашивает имя пользователя и здоровается с ним
1.Написать программу, которая запрашивает имя пользователя и здоровается с ним. program pr; uses wincrt; var s:real; writeln('Введите ваше имя'); readln(s); writeln('Здравствуйте, ',s);...

Сборник задач на множественный выбор (Case; If... Then If...)
Я столкнулся с тем, что у многих людей задачи одинаковые, и многие ищут решения в Интернете, тем самым убивая время на поиски. Вот и решил объединить их и разместить в одной теме. (В первую очередь...

Arccos, Arcsin в Pascal
Не понимаю, как в Pascal`е записать следующие выражения: arcsin^2(k*x) arccos(k*x) Если кто знает, напишите пожалуйста.

программа для нахождения нок
Ребят нужно написать программу на пасскале для нахождения наименьшего общего кратного для двух чисел при помощи repeat.:wall:

Найти первую цифру числа
Дано натуральное число n. Найти первую цифру

Даны действительные числа а1,а2, . . . ,аn. Поменять местами наибольший и наименьший элементы.
Помогите пожалуйста

Тест по информатике.
1. Для чего производится описание массивов ? А) Чтобы помнить самому сколько ячеек в массиве Б) Чтобы ЭВМ запомнила имя массива В) Чтобы ЭВМ зарезервировала память для хранения элементов массива...

Ошибка: ожидался порядковый тип
Помогите исправить program Hw; const m = 3; var A: array of real; B: array of real; C: array of real; D: array of real;

найти сумму цифр заданного четырехзначного числа
еще три задачки 1) Для матрицы размером NxM вывести на экран все ее седловые точки. Элемент матрицы называется седловой точкой, если он является наименьшим в своей строке и одновременно наибольшим в...

Скачать Работающий Pascal для windows 8
Здравствуйте. Долго долго очень долго блуждая по просторам интернета, я искал pascal и всегда наталкивался на, то что паскаль не запускался и выдавал не известную ошибку и не кто толком не мог дать...

Циклы, 32 задания
Задали вот в инсте, нужно сделать в ближайшие пару дней, так как я болел. Часть задач есть но сомневаюсь в правильности. кому не сложно скиньте код(решение) хотябы некоторых. Циклы. 1....

Найти максимальное из двух чисел
даны 2 числа вывести вначале большое а затем меньшее из них зарание бальшое спс

Программа для перевода чисел из одной системы счисления в другую
Написать программу для перевода чисел из одной системы счисления в другую. Из 10 в 2, Из 16 в 8. Задание может быть выполнено в виде двух программ (одна выполняет одно преобразование, другая -...

Как записать arccos?
помогите записать в паскале arccos((-1)^(i+j))

число кратное 5
Доброго врмени суток!! Помогите!Разобратся! Условие: Найти все числа кратные 5 из интервала М и К. Программа: Program CP_30; uses crt; var M,K,N:integer; begin clrscr; write('Введите интервал...

Integer и Real
короче, как с этим быть? если сделать тип данных REAL и сделать просто какойнить калькулятор он както коряво отображает результат если результат 25 то отображается 2.50000000000(+00001) а если...

Найти сумму всех четных элементов массива, стоящих на четных местах
5.Дан массив целых чисел.Найти сумму всех четных элементов массива, стоящих на четных местах, то есть имеющие четные номера.

Подсчитать сумму всех цифр в строке
дана строка символов состоящая из букв и цифр. подсчитать сумму всех цифр в строке

Определить, имеется ли среди чисел a, b, c хотя бы одна пара взаимно противоположных чисел
.Определить, имеется ли среди чисел a, b, c хотя бы одна пара взаимно противоположных чисел.

Программы для построения блок-схем по коду
кто знает более-менее точные программы для построения блок схем по коду.

В заданном одномерном массиве поменять местами соседние элементы, стоящие на четных местах, с элементами, стоящими на нечетных
Буду очень признателен:) "В заданном одномерном массиве поменять местами соседние элементы, стоящие на чётных местах, с элементами, стоящими на нечётных. Каждый элемент массива выбирается...

Вычисление sin и cos (быстрый алгоритм)
Задача. Вычисление sin и cos (быстрый алгоритм) Прошу исходник

Ошибка 106: Invalid Numeric Format
Что значит в Паскале ошибка номер 106: Invalid Numeric Format? заранее спасибо

Определить время падения камня на поверхность земли с высоты h
Помогите с решением на паскале :)

Написать программу для вычисления площади параллелограмма
Помогите решить задачу, срочно нужно!!! Написать программу для вычисления площади параллелограмма. Ниже представлен рекомендуемый вид экрана во время работы: Вычислить площадь параллелограмма....

Найти разность между максимальным и минимальным элементами массива.
Одномерный массив. Написать Программу для решения следующей задачи. В массиве А=(а(1), а(2),...,а(n)) Найти разность между максимальным и минимальным элементами массива. Двухмерный массив....

Найти все двузначные числа, которые равны утроенному произведению своих цифр
Создать программу, которая находит все двузначные числа, которые равные тройному свой умноженние цифр

Входная строка имела неверный формат
Здравствуйте. Небольшая загвоздочка вышла, не понятная мне. Не мог бы кто-нибудь подсказать в чем дело, пожалуйста? В программе с подключением внешнего файла, и считыванием значений из него,...

Сайт для решения задач онлайн
Я где-то слышал , что есть сайт где можна розвязывать задачи онлайн. И когда ты сделаешь одну , то переходишь на следующий уровень. Подскажите что это за сайт.

Запуск Borland Pascal 7.0 на Windows 7 x64
Народ путем четырех часов гугла и тут поиска я хочу у вас спросить. Можно ли Borland Pascal 7.0 запутить как-то на 64 разрядной вин7 ? очень надо. может посоветуете что-то?

Дано целое число N>0, если оно является степенью числа 3 то вывести TRUE, если нет - FALSE
Дано целое число N>0, если оно является степенью числа 3 то вывести TRUE, если нет - FALSE

Напишите программу, которая определяет, попала ли точка с заданными координатами в заштрихованную область
Напишите программу, которая определяет, попала ли точка с заданными координатами в заштрихованную область. Входные данные Входная строка содержит два вещественных числа – координаты точки на...

Повернуть матрицу на 90 градусов
В двумерный массив размером NxN ввести произвольные числа из диапазона от -4 до 10 (включая границы), N - заданное натуральное число. Переставить элементы в данном массиве так, чтобы содержание...

Как в паскале считать из файла строки
Привет всем. Как в паскале считать из файла строки вида: Петров 170.5 Иванов 183.0

Записать элементы массива в обратном порядке
Записать елементы массива А(n) в обратном порядке Добавлено через 15 секунд помогите решить вообще нечего понять не могу.

Подсчитать количество положительных, отрицательных и нулевых элементов массива
1) Дан Массив действительных чисел размерность которого N.Подсчитать сколько в нём положительных,отрицательных и нулевых эдементов. 2)Составьте программу подсчёта числа нулевых элементов одномерного...

каким тегом поменять цвет вводимого текста в паскале?
каким тегом поменять цвет вводимого текста в паскале textcolor ??????? или какойто другой

Ввести с клавиатуры размер одномерного массива
Ввести с клавиатуры размер одномерного массива и его элементы. Распечатать массив в строчку. Можно поподробней.

Перевод целого числа из десятичной системы счисления в шестнадцатеричную
Нужно написать программу на Паскале. Помогите пожалуйста. И чем проще будут записи,тем лучше, я чайник в программировании.

даны 2 угла треугольника в градусах.определить существует ли такой треугольник
ребят помогите пожалуста с программой даны 2 угла треугольника в градусах.определить существует ли такой треугольник и если да то будет и он прямоугольником

Даны три числа. Найти среднее из них (то есть число, расположенное между наименьшим и наибольшим)
If13. Даны три числа. Найти среднее из них (то есть число, расположенное между наименьшим и наибольшим).

Вывод наибольшего числа
Здравствуйте! Нужна ваша помощь, помогите пожалуйста! Program lab; Var a,b,c,max:integer; Begin Write('первое число:'); Readln(a); Write('второе число:');

Расставьте строки программы в правильном порядке
Расставьте строки программы в правильном порядке, чтобы получилась программа, которая находит сумму первых N натуральных чисел: 1) writeln(‘sum=’,sum); 2) end. 3) end; 4) sum:=sum+i;...

Вывести на экран все четные числа от 0 до 30
Вывести на экран все четные числа от 0 до 30.. 3 способами while , for , repeat. help me please!!:help::wall:%) на процедуры!

Создание геометрических фигур в паскале.
Здравствуйте. Я только начинаю работать в Паскале, поэтому не удивляйтесь столь глупому вопросу. Мне очень хотелось бы узнать как нарисовать в Паскале треугольник, прямоугольник, квадрат, куб,...

Вывести таблицу на экран
Помогите, как создать таблицу в Паскале? :scratch: Объясните, в вообщем принцип написания:) Заранее спасибо:declare:

Сортировка двумерных массивов
Дана матрица 5х5,надо отсортировать все элементы по возрастанию

Дано число n. Найти все его делители.
Нужно реализовать в Pascal. Что бы были входные(1.in) и выходные(1.out) данные. ) создать .ехе файл Задача.Делители Условие задачи: Дано число n. Найти все его делители. Решение: Т....

Вычислить x в степени n
Вычесли x в степени n.

Преобразование чисел из римской системы в десятичную и обратно
Составить программу преобразования натуральных чисел из римской системы счисления в десятичную и обратно. Вообще не понимаю как делать :(

Удаление из массива повторяющихся элементов
Как в массиве убрать одно из повторяющихся чисел??? тоесть дан массив 1,1,2,3,4,6,3,2,1 получить 1,2,3,4,6 Добавлено через 12 минут Люди хелп!!! очень нуна!!!

Сформировать новый массив В, состоящий из положительных элементов массива А
Задача простая, но в силу своей неопытности решить её не получается. HELP! Массив А вводится с клавиатуры. Сформировать новый массив В, состоящий из положительных элементов массива А. Размер...

Присвоить переменной Г текст, что состоит из первых 5 символов строки А и 5 и 6 символов строки Б
Помогите кто-нибудь!!!! Очень нужны ответы на такие вопросы!!!!!! Заранее всем большое спасибо:)!!!! 1. Длина строки- это количество символов между скобками? 2.Записать с помощью паскаль:...

Что такое exp
Приветствуюю Объясните пожалуйста , что такое exp. Расскажите что это вообще такое Такое слово я обнаружил у себя в программе и не понимаю за что оно выполняет.

Напишите программу которая выводит на экран таблицу умножения на n
напишите программу которая выводит на экран таблицу умножения на n (n-целое число в диапазоне от 2 до 10, вводимое с клавиатуры).

Найти все пятизначные числа, которые при делении на 133 дают в остатке 125, а при делении на 134 дают в остатке 111
Нужна помощь! Найти все пятизначные числа, которые при делении на 133 дают в остатке 125, а при делении на 134 дают в остатке 111

Нахождение максимального элемента в массиве.
Решите задачку пожалуйста. Найдите максимальный элемент в массиве.

Дано трехзначное число.Определить, является ли сумма его цифр двузначным числом?
№1 Дано трехзначное число.Опредилить являеться ли сума его цифр двухзначным числом?

Программа для составления слов из введенного слова.
Нахождение в заданном словаре слов,содержащих только букыв заданого слова (например дано слово "программа", и из него можно составить слова пар,паром,грамм,рог...) основное слово вводиться с...

Вычисление корня методом хорд
функция x^2-5x+6=0 нужно составить программу вычисления корня методом хорд, помогите, очень прошу ) заранее спасибо! интервал любой, так что можно вводить с клавиатуры, точность E=0.001

Составьте программу для вычисления периметра прямоугольника
1.Составьте программу для вычисления периметра прямоугольника 2. Заданы числа a и b. Определить, эти числа одного или разных знаков. 3. Составьте программу, выводящую на экран квадраты чисел от 10...

Дано натуральное число n, переставить местами первую и последнию цифру местами.
№ 1: Дано натуральное число n, найти сумму первой и последней цифры этого числа. № 2: Дано натуральное число n, переставить местами первую и последнию цифру местами. Сам пробовал делать...

Реверс половин массива
Помогите написать программу пожалуйста(только без функции swap) Массив имеет четное число элементов. Заполнить массив случайными числами и выполнить реверс отдельно в первой половине и второй...

Вычисление определенного интеграла методом трапеций.
Методом трапеций вычислить значение интеграла S = (cos (x)) на отрезке интегрирования . Считать заданным численный метод решения. Включить в программу вычисление точного значения интеграла. На печать...

Заполнить массив случайными числами и вывести на экран отсортированный массив.
Заполнить массив случайными числами и вывести на экран отсортированный массив. Добавлено через 3 минуты 43 секунды очень срочно!!! Добавлено через 57 минут 37 секунд я не понимаю в...

Найти max{min(a,b), min(c,d)}
Найти max{min(a,b), min(c,d)}. написать в Паскале.Помогите очень надо до завтра!

База данных в Pascal...
Просто Paskal я напроч забыл, я работаю с другими языками программирования, а это задание очень важно для меня На свое усмотрение создать меню для выбора основных действий работы с программой, таких...

Напишите программу, которая сортирует массив целых чисел и определяет количество различных значений в нём
Помогите написать код,спасибо.Напишите программу, которая сортирует массив целых чисел и определяет количество различных значений в нём. Входные данные Первая строка содержит размер массива N . Во...

Найти все пятизначные числа, которые при делении на A дают в остатке B, а при делении на C дают в остатке D
Напишите программу, которая вводит четыре натуральных числа (a, b, c и d) и находит все пятизначные числа, которые при делении на a дают в остатке b , а при делении на c дают в остатке d . Входные...

как скопировать текст(код) в паскаль?
как скопировать текст в паскаль

Ввод/вывод матрицы
помогите с куском программы. введение кол-ва столбцов матрицы, введение кол-ва строк матрицы, введение каждого элемента матрицы. Добавлено через 1 минуту ввод элементов с клавиатуры. рандомом...

Вывести массив на экран
program mass; //------------------------------------------ var i,n:integer; min:real; A:array of real; begin randomize; //забиваем размер массива n:=random(10); //забиваем массив

Сортировка чисел по возрастанию и убыванию
Написать программу,сортирующая числа в массиве по возрастанию и убыванию. Числа в массив задаёт сам пользователь.

Дано целое число N (> 1). Найти наибольшее целое число K, при котором выполняется неравенство 3K < N.
Дано целое число N (> 1). Найти наибольшее целое число K, при котором выполняется неравенство {3}^{k} < N. как возвести в степень, и как решить задачу при помощи цикла while?

Как пишится "НЕравно"?
=, >, < и...

Составить алгоритм транспонирования матрицы
составить алгоритм транспонирования матрицы

Error 39: Ordinal expression expected
______________________________________________________ Program lr3var21; Var x,y:real; Begin Writeln('vvedite argument'); Readln(x); Case x of 1..9999: y:=sqrt(x); 0:...

Выделение корня n-й степени.
Программа выделения корня из числа. Число и степень корня вводятся с клавиатуры. Что не так?? Program koren; var k,n:integer; s:real; Function po(x:real;m:integer):real; var y:real; ...

Напишите программу, которая сортирует массив по возрастанию "методом камня": аналогично "методу пузырька", но
Помогите пожалуйста написать код.Напишите программу, которая сортирует массив по возрастанию "методом камня": аналогично "методу пузырька", но в обратном порядке: самый "тяжелый" элемент из...

Напишите программу, которая заменяет в символьной строке все буквы a на буквы b , a буквы A на буквы B
Здравствуйте,помогите пожалуйста написать программу .Напишите программу, которая заменяет в символьной строке все буквы a на буквы b , a буквы A на буквы B .Входные данные Входная строка содержит...

Найти максимальный и минимальный элементы массива
найти максимальный и минимальный элементы массива длинна массива 11 тип элементов integer

Построить интерполяционный многочлен Лагранжа
надо написать программу Построить интерполяционный многочлен Лагранжа по известным в узлах x0,x1,...x5, значения функции f(x). Вычислить значения этого многочлена в равномерной сетке точек на...

Длина окружности. Определить площадь круга, ограниченного этой окружностью.
Известна длина окружности. Определить площадь круга, ограниченного этой окружностью. Помогите пожалуйста.

Процедура Sleep. Скорость анимации в Паскале.
Почему-то минимальная пауза, которую делает программа, 10 мс. Например begin for var i:=1 to 100 do begin write(i); sleep(1); end; writeln; writeln; ...

Нарисовать кораблик
Написать программу, которая вычерчивает на экране кораблик. Использовать заливку цветом.

Вычислить интеграл методом Симпсона
помогите, пожалуйста, кто сможет, написать программу вот Вычислить приближённое значение интеграла от функции F(x)=exp(2*x)-exp(x)-ln(abs(x)+1)*cos(x) на отрезке с точностью е=0,0001....

Вывести на экран запись числа, меньшего, чем 8^10, в виде 10 знаков в восьмеричной системе счисления
Напишите процедуру, которая выводит на экран запись числа, меньшего, чем 8^10, в виде 10 знаков в восьмеричной системе счисления.

По координатам трех вершин некоторого треугольника найти его площадь и периметр
Помогите написать программу! 1) По координатам трех вершин некоторого треугольника найти его площадь и периметр.

Срочно нужен Паскаль для Windows 7
срочно нужен паскаль для Windows7!!!!!!!!!!

Вывод максимального и минимального из 3-х чисел
Здравствуйте! Помогите пожалуйста разобраться... в восьмом классе не велась информатика, а потом перешел в другую школу, а там началось программирование. Я не понимаю, как написать программу по...

Программа вычисления расстояния между двумя точками с заданными координатами
Напишите программу вычисления расстояния между двумя точками с заданными координатами X1,Y1, X2,Y2, с использованием подпрограммы- процедуры.

по координатам вершин треугольника вычислить его периметр
по координатам вершин треугольника вычислить его периметр, вычисление длины отрезка оформить в виде процедуры. через паскаль аbc)))

Постройте алгоритм и составьте программу, по которой будет реализован следующий сценарий:компьютер запрашивает номер дня недели, после ввода компьютер
Постройте алгоритм и составьте программу, по которой будет реализован следующий сценарий:компьютер запрашивает номер дня недели, после ввода компьютер сообщает название этого дня.Например, если ввели...

составить программу для вычисления дискриминанта
составить программу для вычисления дискрименанта (корень квадратный b квадрат *4 *a *c) с использованием процедуры (sqrt((b)*(b)*4*a*c)) Добавлено через 2 минуты как удалить тему?

Определить время года по номеру месяца
var a:integer; begin writeln('Введите номер месяца (число от 1 до 12) и нажмите <Enter>'); write('-> '); readln(a); if (a<1) or (a>12) then writeln('Это число не является номером...

Лежит ли точка внутри треугольника?
Помогите!!!!!! Скоро сессия, а я не могу задачу решить. Ничего не понимаю в Паскаль. Буду очень благодарна,если кто-нибудь мне решит её. ЗАДАЧА по теме «Операторы ветвления»: Заданы координаты вершин...

Написать программу, которая выводит таблицу степеней двойки
Будьте добры помогите решить 3 задачи по циклам!!! Буду очень признателен! =) Задача 1. Дано действительное число Х Вычислить: S=1+x2/2!+x4/3!+x6/4!+…+x16/9! Вычисления произвести тремя...

Как разбить любое число на отдельные цифры
напр. дано 23523, должно получиться: masNum = 2; masNum = 3; masNum = 5; masNum = 2; masNum = 3; нужна именно процедура(ну или прога), ато немогу я сам, не лезит никак в голову, знаю...

Заменить каждый символ «точка» в строке на символ «вопросительный знак»
Общая инструкция. В программе необходимо определить динамическую длину строки и вывести это значение на экран. Для проверки наличия различных символов в строке используйте тип множества, описанный...

Как вывести текст на экран
Добрый день. Проблема в следующем. Есть программа: program proba; uses crt, graph; var begin write('hello'); readln; end.

делиться число А на В без остатка
Помогите пожалуйста!!! Не могу составить программки) 1.Даны числа А и В. Написать программу, которая будет проверять, делиться число А на В без остатка. 2.Написать программу нахождения...

Заполнить двумерный массив случайными числами
Задача на Паскале: Заполнит двумерный массив размерностью N*M(константы) случайными числами и определить среднеквадратичное отклонение элементов массива. Вывести на экран двумерный массив... У...

Определить количество трехзначных натуральных чисел, сумма цифр которых равна заданному числу N
сост прогу Определить кол-во трехзначных натуральных чисел, сумма цифр которых равна заданному числу N заранее спс огромное

Шифр Цезаря
Помогите написать программку, которая будет зашифровывать методом диска шифра Цезаря, т.е. нужно задать исходный текст, количество знаков сдвига и через какое количество знаков произойдет очередной...

Рекурсия - числа Фибоначчи
Вычисление n -го чмсла фибоначчи, исходя из реккурентного определения этих чисел: каждое последующее = сумме двух предыдущих

Рассматривается множество целых чисел, принадлежащих числовому отрезку [3712; 8432]
Рассматривается множество целых чисел, принадлежащих числовому отрезку , которые удовлетворяют следующим условиям: − запись в двоичной и четверичной системах счисления заканчивается одинаковой...

Сортировка массивов. Сортировка выбором
Помогите пожалуйста, я что-то совсем запуталась при составлении данной программы... Сортировка выбором. Дана последовательность чисел а1, а2, …, аn. Требуется переставить элементы так, чтобы они...

Среди двухзначных чисел найти сумму квадратов цифр которых делится на 13
среди двухзначных чисел найти сумму квадратов цифр которых делится на 13

Дано действительное число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить:а4
1)Дано действительное число а. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить:а4 и а20 за пять операций 2)даны действиетные положительные числа...

Объявить массив как константу.
собственно, вопрос в теме - как задать значение элементов массива прямо при его объявлении? до меня дошли слухи, что это можно сделать в том случае, если массив будет объявлен константным, но я не...

Составить алгоритм и блок-схему для вычисления значения функции
Составить алгоритм и блок-схему для вычисления значения функции Y при заданном значении аргумента X: Y=(X-3)2+4(X+5), X=3

Является ли треугольник равносторонним
помогите решить задачи:swoon: 1) Является ли треуг. АВС равносторонним. Стороны вводятся с клавы. 2) Могут ли числа a,b,c быть сторонами треуг. только что бы код не сильно мудрёный был,...

Label
Мне вот интересно-а зачем он вообще нужен?=) Зачем в паскале нужны метки,и как они испольуются? Очень интересно узнать =) Добавлено через 58 секунд Мне вот интересно-а зачем он вообще нужен?=)...

Составить программу, которая печатает таблицу умножения и сложения натуральных чисел в десятичной системе счисления
Составить программу на Паскале, которая печатает таблицу умножения и сложения натуральных чисел в десятичной системе счисления. Заранее большое спасибо

Вычислите n-й член последовательности, заданной формулами
Здравствуйте, помогите найти ошибку в коде Вот условие: Вычислите n-й член последовательности, заданной формулами: a2n = an *+ 1 (n>0), a2n+2 = a2n+1 - an (n>0), a0=1, a1=1. Входные данные...

Нарисовать Звездное Небо
Program Zvezdy; Uses Crt,Graph; Var X,y,z,k,gd,gm:integer; Gd:=Detect; InitGraph: (Gd,Gm,'C:\Tp\Bin'); Randomize For k:=1 to 400 do Begin x:=random(640); y:=random(480);

даны длины сторон прямоугольника.найти его периметр и длину диагонали
1)даны длины сторон прямоугольника.найти его периметр и длину диагонали. 2)Составит программу,которая отгадывает натуральное четное число,,загаданное пользователем. пример:загадайте натуральное...

В чём отличие Read от ReadLn ?
В чём отличие Read от ReadLn ? Я раньше всегда писал Readln и даже не задумывался, чем эта функция отличается от Read. А тут писал программу, она всё никак не работала (вернее, неправильно...

Найти сумму всех четных элементов массива
1 Дан массив целых чисел. Найти сумму всех четных элементов массива, стоящих на четных местах, то есть имеющих четные номера. 2 Дан одномерный массив целых чисел, состоящий из N элементов....

Сумма цифр трехзначного числа кратна 7, само число также делится на 7. Найдите все такие числа
Сумма цифр трехзначного числа кратна 7, само число также делится на 7. Найдите все такие числа.

Дана последовательность целых чисел а1,а2,а3,...аn. Выяснить, какое число встречается раньше-положительное или отрицательное.
Дана последовательность целых чисел а1,а2,а3,...аn. Выяснить, какое число встречается раньше-положительное или отрицательное.

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru