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

Темы раздела Turbo Pascal

По заданным диагоналям ромба вычислить его периметр
Здравствуйте!!! Помогите сделать задачу по информатике. По заданным диагоналям ромба вычислить его периметр, нужно сделать блок схему по ГОСТУ и сделать команду в Turbo Pascal. И составить таблицу с...

Поиск наибольшего элемента массива. Растолкуйте пример пожалуйста!
В учебнике дан пример. Не могу разобраться. program n_4; var i, imax: integer; a: array of integer; begin randomize; for i := 1 to 10 do begin

В чем отличие различных Pascal
Здравствуйте! В чем отличие Pascal от Turbo Pascal, Free Pascal, Pascal ABC и от PascalABC.NET?

Отсортировать символы строки в алфавитном порядке
Разработайте программу в Turbo Pascal, которая считывает с клавиатуры строку символа S и на экране отобразится: строка, полученная путем сортировки в АЛФАВИТНОМ порядке символов в строке S.

Как сделать такой код для вычисления чисел близнецов, а не для матрицы
Program Kursovoy_Matrix; Uses CRT,DOS; Label m1,11; Type mas=Array of String; Const menu:mas=('СПРАВКА', 'ОБРАБОТКА МАТРИЦЫ', 'ВЫХОД'); Const n=10; m=8; ...

Процедура Randomize. Для чего она?
Во множестве примеров приведенных в учебнике Босовой по информатике используется функция Random без предварительной Randomize. Почитал про процедуру. Инициализирует генератор случайных чисел,...

В сетке нарисовать квадраты и закрасить их
Нарисовать "наклонённую сетку" размером 10x10, состоящую из парале- лепипедов одного размера, заполненных разным орнаментом, разного цвета. ( надо сделать через цикл for) В сетку квадраты и...

Написать программу, которая подсчитывает, сколько раз среди символов заданной строки встречается буква “F”
Написать программу, которая подсчитывает, сколько раз среди символов заданной строки встречается буква “F”. Составить программу на языке TurboPascal.

Упорядочить столбцы массива по убыванию сумм элементов столбцов методом пузырька
Упорядочите столбцы массива по убыванию сумм элементов столбцов методом пузырька.

Определить, принадлежат ли заданные точки заданной прямой
Здравствуйте, помогите решить задачу. Определить и сообщить, принадлежат или нет точки A1(х1,у1), A2(х2,у2) с заданными координатами прямой y = kx + b, где k и b – заданные числа. Если - да, ...

Программа для работы с файлами
У меня процедуры не получаются Добавлено через 20 секунд Program com; uses crt; {$I OSHIBKA} (*<-- Проверяет ошибки ввода и вывода*) var t:byte; f,f1:text; Procedure soz; var j:string; begin...

Уменьшить значение элементов массива в 2 раза
Ввести с клавиатуры одномерный массив, уменьшить значение элементов в 2 раза и вывести на печать.

Значение по-умолчанию
Добрый день! Имеется программа для работы, написанная в Паскале, в которой на появляющиеся, на определенном этапе, вопросы нужно вводить значение 1 или 0 (дальше или отмена соответственно). Поскольку...

Если знаки двух чисел совпадают, вычислить их среднее геометрическое, иначе вычислить их среднее арифметическое
Даны два целых числа x и y. Проверить и сообщить, имеют или нет они одинаковые знаки, если – да, то вычислить их среднее геометрическое, если – нет, то вычислить их среднее арифметическое.

Перевести код из Java в Паскаль
public class IntegrFilter { public static void main(String args) { int k=1; double sum=0,dt=0.7; double resX=new double; double resT=new...

Вывести слово лет в соответствии с числом от 1 до 99
Дано целое число n (n находится в диапазоне от 1 до 99), определяющее возраст человека в годах. Для этого числа необходимо напечатать фразу "мне n лет". Если можно максимально простой ответ, а то...

Что будет выдано на экран
Сколько раз выполнится цикл, и что будет выдано на экран в предложенном фрагменте программы? Ответ объясните. i:=7; y:=0; for i:=0 to i do y:=y*4+i; writeln(y);

Ошибка в учебнике? Пример различных циклов для решения одной задачи
В учебнике по информатике 8 кл. Босовой представлен примеры решения одной задачи с использованием оператора repeat и while. Программа, в которой осуществляется ввод целых чисел (ввод...

Вычислить значение выражения
Составление программ циклической структуры. Вычислить

Рассчитать значение гиперболического синуса по итерационной формуле
Рассчитать значение гиперболического синуса по итерационной формуле с заданной точностью. Не получается код препода: program project4; const MaxIter = 500; { максимально допустимое количество...

Переставить максимальный элемент массива и элемент, в два раза превышающих индекс (при условии, что оба - единственные)
Организовать заполнение целочисленного одномерного массива С. Переставить максимальный элемент массива (при условии, что такой элемент единственный) и элемент, в два раза превышающий свой индекс (при...

Вычислите значение заданной функции, если Х изменяется от Хнач до Хкон с шагом ΔХ
Вычислите значение заданной функции, если Х изменяется от Хнач до Хкон с шагом ΔХ (в качестве исходных данных может использоваться другая переменная. Если при функции стоят знаки суммы (∑)или...

Найти сумму элементов массива, больших заданного с клавиатуры числа
Составить программу и заполнить таблицу значений переменных. Цикл организовать вручную. Найти сумму элементов массива, больших заданного с клавиатуры числа. Массив Е: -3 -10 -8 -2 10 Число Х=-5

Реализовать в виде модуля набор подпрограмм для выполнения следующих операций над длинными числами
Всем привет ! Не понимаю как сделать эту задачу ( Реализовать в виде модуля набор подпрограмм для выполнения следующих операций над длинными числами: 1) сложения; 2) вычитания; 3) умножения; 4)...

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

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

Заполнить треугольник
Заполните треугольник высотой n строк цифрами от 0 до 9 (циклически) с последовательно меняющимися цветами снизу вверх по следующему шаблону 45678 123 0 (Перенесено из Pascal ABC.NET)

Возможно ли в Pascal реализовать программу написанную на R
Сгенерировать выборку случайных чисел, распределённых по экспоненциальному закону с параметром λ=0,5 размером 1000. Построить гистограмму, оценить мат. Ожидание, дисперсию, закон распределения. Вывод...

Вложенный алгоритм неправильно считает среднее арифметическое
Задача. Напишите программу, в которой осуществляется ввод целых чисел (ввод осуществляется до тех пор, пока не будет введен ноль) и подсчет суммы и среднего арифметического введенных положительных...

Определить наличие подстроки в строке
Определить наличие в строке S подстроки F. Вывести на экран соответствующее сообщение.

Определить кратчайшее расстояние от заданной точки, приналежащей фигуре, до границы фигуры
Определить кратчайшее расстояние от заданной точки до границы заданной фигуры, если точка находится внутри фигуры, иначе вывести -1 Фигура

Из исходного файла переписать в другие два файла заданные максимальные и минимальные значения
Типизированные файлы. Дан файл целых чисел. Записать в другие два файла целых чисел соответственно максимальные и минимальные значения: при записи в n-ый элемент файла находятся максимумы чисел,...

Найти расстояние между точками, если расстояние = Z, вычислить сумму квадратов абсцисс, иначе произведение абсцисс
На плоскости находятся две точки М1(x1 ,y1) и М2(x2 ,y2) с заданными координатами. Вычислить и вывести расстояние d между ними. Если оно равно заданному числу Z, то найти сумму квадратов абсцисс этих...

Описать рекурсивную функцию
Доброго времени суток, не как не получается решить данное задание. Может кто то уже сталкивался с этим. Задание: "Описать рекурсивную функцию y(картинка нижу), n и x вводит пользователь,...

Найти произведение максимальных элементов матрицы, расположенных на диагонали, параллельной побочной
8-0-17 Найдите произведение максимальных элементов квадратного массива, расположенных на диагонали, параллельной побочной диагонали.

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

Заменить в символьной строке все символы «я» на «Й»
Заменить в ведённой символьной строке все символы «я» на «Й». Вывести на экран символьную строку до и после изменения, а также длину строки.

По ведомости определить количество отличников и средний балл каждого студента
Из ведомости 7 студентов с их оценками (порядковый номер, Ф.И.О. и три оценки) определить количество отличников и средний балл каждого студента

Сортировка массива выбором. Фрагмент программы
В учебнике такой вот текст. Сортировка выбором (например, по невозрастанию) осуществляется следующим образом: 1) в массиве выбирается максимальный элемент; 2) максимальный и первый элемент...

Заполнить таблицу случайными числами и вывести ее на экран в строчку
Составить программу на языке TurboPascal с использованием двумерных массивов Написать программу, заполняющую случайными числами таблицу размерности 5*5 и выводящую ее на экран в строчку.

Вычисление заданного массива
Дан массив X из n чисел. Вычислить: y = xn(xn+xn-1)(xn+xn-1+xn-2)...(xn + ... + x1) .

Задания на паскаль ,буду премного благодарен, срок - до воскресения
1 ЗАДАЧА Ваня идет поздней ночью по прямолинейной улице длины l, которая освещается n фонарями. Введём систему координат, в которой начало улицы соответствует точке 0, а её конец — точке l. Тогда...

Составить программу вычисления суммы строк элементов матрицы. Вычисление суммы оформить в виде процедуры
Составить программу вычисления суммы строк элементов матрицы. Вычисление суммы оформить в виде процедуры

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

Определить принадлежность точки заданной области
Составить программу, позволяющую определить, находится ли точка с произвольно заданными координатами в заштрихованной области. Если точка принадлежит заштрихованной области, то переменной q...

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

Создать процедуру, которая переводит комплексные числа в показательную форму
П14-0-17 Создайте процедуру, которая переводит комплексные числа в показательную форму. Первые два аргумента – дей- ствительная и мнимая часть числа; вторые два аргумента – модуль и аргумент...

Типизированный файл
uses crt; type pupil=record // ввод переменных f:string; year: integer; p: string; fac:string; end; var student: array of pupil; c,n:byte; i:string;

202 Stack overflow error | Turbo Pascal | Turbo Vision
Здравствуйте! Столкнулся с ошибкой 202 Stack overflow error (Переполнение стека) Программа является графической оболочкой "файлового менеджера". Хотел добавить кнопку с индивидуальным заданием,...

Анимация шарика, отскакивающего от стенок стакана
Не могу никак сделать, помогите пожалуйста. Задача на Turbo Pasqual (Шарик). Шарик влетает в стакан, отскакивает от стенок и меняет направление движения. Траекторию движения шарика не...

Вычислить произведение П
Вычислить произведение П на C++ и pascal

Информатика программа 9 класс
посмотрите вложение, составить надо программу по графику

Кодировка на русский
Добрый день. Помогите пожалуйста с кодировкой на русский язык. Было дано задание зашифровать текст. Куда нужна вставить кодировку, чтобы правильно отображалось? Const Consonant=; Var ...

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

Найти произведение элементов вектора, равных числу К, и количество отрицательных элементов
Организовать заполнение целочисленного массива С, размерностью М. Найти и вывести на экран произведение элементов вектора, равных числу К, введённому с клавиатуры, и количество отрицательных...

Указать номер столбца, максимально удалённого от последнего столбца заданной матрицы
Расстояние между k-м и l-м столбцами матрицы A=(aij) определяется как \sum_{i=1}^{n} | a_{ik} | | a_{il} | Указать номер столбца, максимально удалённого от последнего столбца заданной матрицы....

Протабулировать функцию
Составить блок-схему алгоритма решения циклической задачи вычисления значения функции y = f(x) в зависимости от значения аргумента x, изменяющегося от начального значения x0 до конечного значения xk...

Описать программу функцией
Предложена задача. Вычисление факториалов и дальнейшие действия с ними. Условие - вычислять факториал функцией. Родил программу вычисления факториала, а загнать ее в функцию никак не получается....

В одномерном массиве вещественных чисел заменить все нулевые элементы значением последнего элемента массива
В одномерном массиве вещественных чисел заменить все нулевые элементы значением последнего элемента массива. Решить через Repeat, While, If. Program Pomogite_dodelati; Uses Crt; const n=50;...

Заменить цикл while на цикл for
Здравствуйте, вы можете программу сделать через цикл for тут у меня приведено с циклом while Нужно поменять while на for. program four; var r,s,d: real; begin write ('Введите кол-во дней...

Дано 15 вещественных чисел. Найти порядковый номер того из них, которое наиболее близко к какому-нибудь целому числу
Дано 15 вещественных чисел. Найти порядковый номер того из них, которое наиболее близко к какому-нибудь целому числу. На pascal и C++

Вставить в строку L в позицию V подстроку R, а в позицию S число 78
Задание №4: Вставить в строку L в позицию V подстроку R, а в позицию S число 78. Вывести на экран символьную строку до и после изменения.

Вычислить заданное смешанное арифметическое выражение для данных в форматах REAL (переменные a, b) и INTEGER
- 2c - ln(d) + 53/a / 4 - 1. Кому не трудно, решите пожалуйста.

Для каждой игры определить словесный результат игры (выигрыш или проигрыш)
В одном массиве записано количество мячей, заброшенных баскетбольной командой в каждом из 15-ти матчей, в другом — количество пропущенных мячей. Для каждой игры определить словесный результат игры...

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

Написать программу, реализующую трех входовый дешифратор или трех выходовый шифратор
Написать программу, реализующую трех входовый дешифратор или трех выходовый шифратор.

Цветное горизонтальное меню с пунктами
Не могу понять в чем проблема в коде. Не вводятся цифры в пункт "Группа". В пункт Группа должны вводится Цифры от 0 до 9, буквы и сиволы. Пример: Группа: 2-2 ИС. Ошибка скорее всего в кейсах, не...

Вывести фамилии и имена столбиком
Важно использовать процедуру. Написать программу в ходе которой фамилии и имена будут выведены столбиком. Каждая строка имеет вид: Фамилия пробел имя пробел запятая после последней строки точка...

Вычислить значения функции на заданном интервале
Помогите решить задачу паскаль 1. Написать программу, вычисляющую значение функций cos(x)/x + tg(x), если x < -8; tg(x) + tg(x), если -8 <= x <-5; cos(x) / cos (2*x) - x / tg(x), если -5 <= x....

Вычислить произведение ряда
Вычислите значение на Pascal и С++

Вывести в алфавитном порядке слова строки, в которых первая буква – гласная
В задании под словом понимается любая максимальная последовательность символов, не включающая пробел. В данных заданиях нельзя использовать какие-либо строковые процедуры/функции, кроме length (или...

Включить вектор в качестве заданной строки матрицы
Разработать алгоритм и программу обработки двумерного массива (матрицы). Помогите, пожалуйста, сделать блок-схему. Задание: Включение вектора C(N) в качестве заданной строки матрицы. В...

Если треугольник равнобедренный, то вычислить его площадь, иначе вычислить его периметр
Задание: Имеется треугольник с заданными длинами сторон х, у, z. Проверить и сообщить, является или нет этот треугольник равнобедренным. Если – да, вычислить и вывести его площадь по формуле Герона,...

Программирование в mikroPascal Pro for AVR (перебор комбинаций с их дальнейшим использованием)
как сделать так, чтобы paket изменялся от 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 до 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, при условии что 4 имеет высший разряд, т.е. после 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,...

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

Описание процедуры. Теория. Пример
Цитирую из учебника. Описание процедуры имеет вид: procedure <имя_процедуры> (<описание параметров-значений>; var: <описание параметров-переменных>); begin <операторы> end; В заголовке...

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

Вычислить значение выражения
Вычислить: z = sin(a) + b. f(i) + 5 (x) - формула 11 f(i) + 6 (x) - формула 12 x - целое значение Вывести значение i, a, b, z.

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

Тип color и month
Используя типы Color и Month определить порядковые номера значений green, black, mar, dec, а также succ(nov) и pred(feb)

В одномерном массиве каждый третий элемент заменить на число, введённое с клавиатуры
В одномерном массиве каждый третий элемент заменить на число введённое с клавиатуры. Не могу с других тем переделать под свою программу.

Вычисление наибольшего общего делителя двух чисел
Вот есть такая задачка: вычисление наибольшего общего делителя двух чисел. Надо представить два решения. Одно с циклом repeat и второе с циклом while. С циклом repeat победил на ура! Вот честно! А...

Вывод атрибутов файла турбо паскаль
Приветствую! Попытался засунуть код в оболочку Turbo Vision и напоролся на неприятность. :wall: Возникла проблема с выводом атрибутов файла, постоянно говорит мол у тебя архивный файл, батенька!...

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

Как в массив B вставить элементы кратные 5 из массива А ?
program abc; var a:array of integer; b:array of integer; i,min:integer; begin randomize; for i:= 1 to 20 do begin a:= -15 + random(55); Write(a:5);

Резидентная программа озвучивающая клавиатуру
Написать программу, которая должна “озвучивать” клавиатуру, т.е. после запуска этой программы нажатие любой клавиши на клавиатуре будет сопровождаться звуковым сигналом. Клавиатура при этом должна...

Нет перегруженной подпрограммы с таким количеством параметров mass
unit Module1; interface procedure mass(a:array of real;s:string;M:integer); function f (u,t:real):real; function FindMax(A:array of real):real; implementation procedure mass(a:array of...

В городе имеется n магазинов, которые производят закупку продуктов. Есть 5 оптовых баз: «Сладкая жизнь», «Маричка», «Рос
Написать программу для решения следующих задач: В городе имеется n магазинов, которые производят закупку продуктов. Есть 5 оптовых баз: «Сладкая жизнь», «Маричка», «Росинка», «Водолей», «Равиолла»....

Как повторить функцию delay() прибегнув к использованию счетчика тиков таймера?
Добрый день! нужно повторить функцию delay() из модуля crt, но с условием, что нужно обращаться к счетчику тиков таймера, а именно к адресу 0040:006Ch При обращении оно тупо дает количество времени,...

По одному из размеров определить остальные размеры куба
3-0-21 С клавиатуры вводится число a и число b \small \in {1, 2, 3, 4} (именно в этом порядке). Рассмотрим куб. Если b = 1, то a – длина стороны куба, если b = 2, то длина диагонали грани, если b =...

Вычислить среднее значение всех элементов массива
Создать одномерный массив из 50 индексов («ячеек»). Заполнить элементы массива случайными целыми числами в диапазоне от 20 до 105. Вычислить среднее значение всех элементов массива и данное число...

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

Составить программу по блок-схеме

Отсортировать одночлены полинома по степени одночленов
Помогите, пожалуйста, с задачкой) Free/Turbo Pascal Для некоторого полинома существует массив пар чисел (ai, mi), (1<= i<=n), где ai - коэффициент одночлена (целое, вещественное,...

Нужно переписать программу
Нужно переписать программу, чтобы работало с char

Программирование разветвляющихся вычислительных процессов
Начертите блок-схемы и создайте программы для задач. 1) Вычислите 2) Даны два произвольных числа. Найдите модуль разности этих чисел, если их разность меньше 0, а если их разность больше или...

Ничего не понятно, но очень интересно- Общее задание 1
=-O:wall::wall::wall: П.5.18.Правил Запрещено размещать задания и решения в виде картинок и других файлов с их текстом. П.5.16.Правил Запрещено создавать темы с множеством вопросов во всех...

Найти сумму арифметической прогрессии
Составьте программу для нахождения суммы чисел, первое из которых равно 5, каждое следующее на 3 больше предыдущего значения их не превышают числа 21. Используйте While...do. результат выполнения...

В одномерном массиве найти максимальное произведение двух рядом стоящих чисел
Помогите пожалуйста написать код к программе на Pascal

Определить, принадлежит ли заданная точка заштрихованной части плоскости, если да, вывести "YES"
Определить, принадлежит ли заданная точка заштрихованной части плоскости, если да, вывести "YES".

Перед каждым словом «дом» добавить слово «большой»
помогите решить пожалуйста .Составить программы, с помощью которых: - сформировать текстовый файл из строк, которые должны быть введены с клавиатуры; - перед каждым словом «дом» добавить слово...

Перед каждым словом «дом» добавить слово «большой»
Составить программы, с помощью которых: - сформировать текстовый файл из строк, которые должны быть введены с клавиатуры; - перед каждым словом «дом» добавить слово «большой». program er; var ...

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

Написать программу ввода с клавиатуры и вывода на экран значений одномерного массива
№1. Написать программу ввода с клавиатуры и вывода на экран значений одномерного массива А, состоящего из n вещественных элементов (n=10). Найти сумму элементов этого массива и вывести ее на экран....

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

Ввести три числа, найти их сумму, произведение и среднее арифметическое
Всем привет.Помогите, плиз. Срочно нужно написать пару простейших программ в паскале. В школе задали по информатике написать в паскале. А я несколько уроков пропустил из-за олимпиад по английскому....

Написать программу, которая 10 раз выводит на экран имя и фамилию.
Написать программу, которая 10 раз выводит на экран имя и фамилию.

Определить простое число или нет
Нужна помощь. Как написать программу что бы она определяла какое число вводишь простое или нет.

Скачать Турбо Паскаль 7.0
Скачать Турбо Паскаль 7.0(исправлено) https://www.cyberforum.ru/pascal/thread48833.html#post253739

Найти сумму цифр трехзначного числа
ТАКАЯ ЗАДАЧКА) Вводим трехзначное натуральное число.Нужно найти сумму чисел этого числа. program nomer; var N:real; begin writeln('vvedite chislo '); readln(N); N:=(N div 100)+((N div 10)...

Как написать корень 3й степени?
Подскажите, пожалуйста, как в Паскале вводить корень в третьей степени. Т.е. нужно решить выражение : W=√(x^2+a) - a2sin2(x+b)/2 и Y = cos3x^3/3 - x/∛(a^2+b^2 ) При с=1.6, b=14.7,...

Даны два целых числа A и B (A < B). Найти сумму всех целых чисел от A до B включительно
Желательно сделать в Pascal или Delphi

Где скачать Turbo Pascal на windows 7 c 64 рех разрядной
Дайте мне силку на Turbo Pascal на 7

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

Написать программу вычисления стоимости покупки с учетом скидки
Практическое задание №9 Написать программу вычисления стоимости покупки с учетом скидки. Скидка в 3% предоставляется в том случае, если сумма покупки больше 500 руб., в 5% − если сумма больше...

Простейший калькулятор
Помогите написать простейший калькулятор который умеет + - : * и все...

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

Калькулятор в Паскале.
Для начала привет! Прошу не критиковать меня за глупые вопросы- я только начинаю. А теперь к задаче. Я писал прогу на паскаль типа калькулятора. Вот сам код: Program kalkulator; Var a,b,c: real;...

Где скачать Turbo Pascal 7.0?
уважаемые,подскажите где скачать турбо паскаль, который содержит инсталяционный файл.

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

Как записать тангенс?
Как записать на Паскаль формулу: tg(x)? Ответьте, пожалуйста!

Ввести с клавиатуры 2 целых числа и напечатать их сумму их сумму, разность, произведение
Ввести с клавиатуры 2 целых числа и напечатать их сумму их сумму, разность, произведение, а также результат целочисленного деления. Добавлено через 3 минуты

Как записать число E в паскале?
Как записать число E = 2.71828183 в паскале, создать переменную?. Нашел в инете что e это экспонента, как тогда записать e^x ? exp(x) :D

Составить программу решения квадратного уравнения
Составить программу решения квадратного уравнения ax 2+bx+c=0.

Напишите программу, которая вычисляет среднюю за неделю температуру воздуха. Исходные данные вводятся с клавиатуры
Пример выходных данных: Введите температуру Понедельник>> 12 Вторник>> 10 Среда>> 16 Четверг>> 18 Пятница>> 17 Суббота>> 16 Воскресенье>> 14

Определить, в какой координатной четверти находится точка
заданы координаты точки (x,y).в какой координатной четверти находится точка? если точка находится на одной из осей сообщить об этом. помогите первый раз столкнулся с такой задачей

Нарисовать домик
Нарисовать домик, чтобы при нажатии на «А» свет в окне загорался, а потом гаснет при нажатии «В»

Дана последовательность действительных чисел a1, a2, ..an. Выяснить, будет ли она возрастающей
Вариант 4. Дана последовательность действительных чисел a1, a2, ..an. Выяснить, будет ли она возрастающей. Напишите текст программы который бы выпонлял условие проги , заранее спасибо

Определить, сколько можно купить быков, коров и телят
составить алгоритм решения задачи: сколько можно купить быков, коров и телят, платя за быка - 10 руб, за корову - 5 руб, а за теленка - 0,5 руб, если на 100 рублей надо купить 100 голов скота.

Даны два действительных числа x и y. Вычислить их сумму, разность, произведение и частное
а)F=x^2(x^2+1) б)Даны два действительных числа x и y. Вычислить их сумму, разность, произведение и частное. в) при любых исходных значений.

Найти расстояние между двумя точками с заданными координатами
Найти расстояние между двумя точками с заданными координатами (x1, y1) и (x2, y2).

Определить является ли число палиндромом через цикл while
Определить является ли число палиндромом через цикл while Добавлено через 16 минут Число 455554

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

В двумерном массиве найти максимальный элемент и его индекс
В двумерном массиве найти максимальный элемент и его индекс.

Вычисление функции на отрезке [a,b) с шагом h
Пожалуйста помогите! Составить программу для вычисления функции F(x) на отрезке [a,b) с шагом h. Результат записать в виде таблицы первый столбец которой - значения аргумента, второй - соотв...

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

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

Найти сумму нечетных элементов массива
6.4) Дан массив целых чисел. Найти сумму нечетных элементов;

Треугольник задан координатами своих вершин.Найти периметр и площадь треугольника
Треугольник задан координатами своих вершин.Найти периметр и площадь треугольника.

Вычисление площади и объема цилиндра
Доброго времени суток! В который раз нуждаюсь в вашей помощи... Создать программу для вычисления площади поверхности и объема цилиндра по принципу "ввод значений -> результат" Информация к...

Вычислить площадь правильного шестиугольника, используя подпрограмму вычисления площади треугольника
решить с использованием функций и процедур... 1.вычислить площадь правильного шестиугольника со стороной a, используя подпрограмму вычисления площади треугольника. 2.вычисление суммы...

Определить, бьет ли слон фигуру
Вот такая чудная задача...Требуется определить, бьет ли слон, стоящий на клетке с указанными координатами (номер строки и номер столбца), фигуру, стоящую на другой указанной клетке. Вводятся четыре...

Как заполнить массив и отрицательными и положительными числами
это только положительными, а как чтобы и отрицательными и положительными??? Заранее благодарю. Matr:=Random(99);

Найти расстояние между двумя точками с заданными координатами
Решите плиииз легенькую задачку) Очень надо Найти расстояние между двумя точками с заданными координатами (x1, y1) и (x2, y2).

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

Есть ли в числе 2 одинаковые цифры
Ввести целое число и определить, верно ли, что в его записи есть две одинаковые цифры. Пример: Введите целое число: Введите целое число: 1234 224 Нет. ...

Вывести 5 раз на экран слово "Информатика"
Очень срочно нужно написать программу в Паскале и нарисовать к ней блок-схему! Тип: Арифметический цикл. Вывести 5 раз на экран слово "Информатика"!

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

Найти сумму элементов побочной диагонали матрицы
Дана квадратная целочисленная матрица 7х7. Найти сумму элементов ее побочной диагонали. Заранее спасибо :)

По номеру дня недели вывести его название
составить программу,которая в зависимости от порядкового номера дня недели (1,2,...,7) выводит на экран его название(понедельник,вторник,...,воскресение)

Правильная кодировка - настроить DOSBox v0.74
русские символы пусть показывает правильная кодировка в Pascal, настроить DOSBox v0.74.

Даны длины ребер прямоугольного параллелепипеда. Найти его объеми площадь поверхности
почему то выдает ошибку! Begin6 Даны длины ребер a,b,c прямоугольного параллелепипеда. Найти его объем V = a*b*c и площадь поверхности S = 2*(a*b+b*c+a*c). Program Begin6; var a,b,c:real;...

Определить пройдет ли кирпич в прямоугольное отверстие
1)Имеется прямоугольное отверстие со сторонами а и b и кирпич с ребрами х, у, z. Требуется определить пройдет ли кирпич в отверстие. программу можно и не писать))чем делать и как?

Найти сумму членов ряда
1. Составить программу, выполняющую расчет следующей суммы 1^2+2^2+3^2+…+n^2. Значение n определяется из условия n = 2*х, где значение х вводится пользователем при работе с программой. 2....

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

Упорядочить массив по возрастанию
Дан целочисленный массив А(N), заполненный датчиком случайных чисел на интервале (0, 100). Упорядочить данный массив по возрастанию.

Решение квадратного уравнения ax2+bx+c=y
Написать программу решения квадратного уравнения ax2+bx+c=y.

Задержка в Паскале
Привет всем! Подскажите как релизовать задержку(delay) на паскале? На самом простом примере: сначало выводится число 1 через 5секунд 2 и т.д

Сортировка массива по убыванию суммы цифр числа
Задача:Напишите программу, которая сортирует массив по убыванию суммы цифр числа. Используйте функцию, которая определяет сумму цифр числа. Я сделала обычный "метод пузырька" (от меньшего к...

Даны катеты прямоугольного треугольника. Найти его периметр
Даны катеты прямоугольного треугольника. Найти его периметр помогите пожалуста(

При использовании функции log (x) при компиляции выводится ошибка "unknown identifier"
Добрый день, при использовании функции log(x) при компиляции выводится ошибка "unknown identifier". Разве эта функция не встроенная? Обьясните, пожалуйста, в чем дело.

Как находится минимальный максимальный элемент массива?
Как находится минимальный максимальный элемент массива? Алгоритм + пример. Спасибо

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

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

Строки. Рекурсия. Как посчитать количество букв в строке?
Начала разбирать строки по книжке. Там есть как посчитать кол-во слов, пробелов, нахождение самого длинного слова и т.д. А вот как посчитать кол-во символов в строке? В книге этого, как отдельной...

Составить программу решения линейного уравнения
Составить программу решения линейного уравнения ax=b.

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

Разбить число на цифры.
как в паскале разбить число на цифры???

Заполнить двумерный массив случайными числами по главной диагонали
Мы наловчились заполнять двумерные массивы номерами циклов. А теперь задача: Заполнить двумерный массив случай- ными числами по главной диагонали. Напечатать оба массива. Вот такую программу...

Поменять местами значения переменных x и y
Поменять местами значения переменных x и y: a) C использованием промежуточной переменной(t:=x; x:=y; y:=t); б) Без использования промежуточной переменной(x:=x-y; y:=x+y; x:=y-x)

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

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

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

Дан радиус окружности.Найти длину и площадь круга
я проболела эти темы ничего не понимаю.Если не затруднит составьте пожалуйста программу и блок схему

Числа вводятся с клавиатуры (кол-во и сами числа). Среди чисел найти сумму кратных 4 и оканчивающихся на 4
Числа вводятся с клавиатуры (кол-во и сами числа). Среди чисел найти сумму кратных 4 и оканчивающихся на 4.

Найти минимальное значение массива
const; n=10; var A:array of integer; i,min:integer; begin min:=A; for i:=2 to N do begin If A<min then min:=a;

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

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

Составить прогрмму получения из слова "дисковод" слова "воск", используя операцию сцепления и функцию Copy
Составить прогрмму получения из слова "дисковод" слова "воск", используя операцию сцепления и функцию Copy. Program test; var s: string; tp_1,tp_2: string; begin s:='дисковод'; ...

Сортировка слов по алфавиту
Помогите написать программу: 1)Программа запрашивает ввести слово (10 раз) 2)Пользователь вводит любые слова (10 раз) 3)Программа сортирует и выводит ,введённые пользователем слова, в алфавитном...

Дано натуральное число. Определить его максимальную и минимальную цифру
2. Дано натуральное число. Определить его максимальную цифру. Определить его минимальную цифру.

Получить целую часть числа
приветик...помогите составить программы да четверга надо прошу вас: Дано действительное число х. Получить целую часть *) числа х; затем – число х, округленное до ближайшего целого; затем – число x...

Определить, к какому дню рождения сумма подарка превысит 100
1.Богатый дядюшка подарил мне 1 доллар в мой первый день рождения. В каждый следующий день рожденье он удваивал сумму подарка и прибавлял к ней столько долларов, сколько лет мне исполнилось. Написать...

Определите значение переменной а после выполнения фрагмента алгоритма
Помогите пожалуйста с написание программы Pascal И составить программу рассчитывающая функцию. И все под номером 5. За ранние спасибо!!!!

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

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

Вычислить сумму и число положительных элементов матрицы
Вычислить сумму и число положительных элементов матрицы A, находящихся над главной диагональю

Как задать размер массива?
Помогите, я только начал изучать Pascal, и вот не могу понять, как мне указать размер массива, если я заранее не знаю какой размер он должен иметь. Например 1..10 или 1..20. В С можно было бы...

Найти сумму элементов главной диагонали двумерного массива
найти сумму элементов главной диагонали двумерного массива Х(5,5)

Отсортировать одномерный массив по возрастанию
var a:array of integer; i,j,a,b:integer; begin for i:= 1 to 10 do begin a:= random(20); write(a,' '); if a > 0 then inc(a); end;

Определить длину строки
Ввести фамилию, имя и отчество в одну строковую переменную. Определить длину строки. Вывести фамилию и инициалы (Фамилия И.О.)

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

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

Известны две скорости: одна в километрах в час, другая - в метрах в секунду. Какая из скоростей больше?
Известны две скорости: одна в километрах в час, другая - в метрах в секунду. Какая из скоростей больше?

Написать программу, проверяющую, принадлежит ли число, введенное с клавиатуры, интервалу [0,5)
1)Написать программу, проверяющую, принадлежит ли число, введенное с клавиатуры, интервалу РЕШИТЬ С ПОСТУСЛОВИЕМ) 4)Написать программу, которая выводит на экран таблицу стоимости телефонных...

Дан массив а(n) вывести элементы массива на экран в обратном порядке
Дан массив а(n) вывести элементы массива на экран в обратном порядке

Метод Эйлера для решения дифференциального уравнения
помогите создать программу решающую диф уравнение y'=2x^2+2y где х0=0 yo=1 h=0,2 на паскале или делфи.методом эйлера и модифицированным методом эйлера+методом рунге кутта.

Определить, есть ли в массиве элементы с одинаковыми значениями, не обязательно стоящие рядом
Задача:Заполните массив случайными числами. Определить, есть ли в нем элементы с одинаковыми значениями, не обязательно стоящие рядом. У меня получилось так Var A: array of integer; i, m:integer;...

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

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

Составьте программу, выводящую на экран квадраты чисел от 10 до 20
Составьте программу, выводящую на экран квадраты чисел от 10 до 20

Створити числовий масив А з 10 елементів. Обчислити суму від'ємних елементів.
Створити числовий масив А з 10 елементів. Обчислити суму від'ємних елементів. Правило форума 1.4. Официальный язык форума - русский.

Составить программу для вычисления таблицы значений функции y=x^2+3(cos)^2*2x на отрезке [0;3] если Х на этом отрезке изменяется с шагом 0.2
Составить программу для вычисления таблицы значений функции y=x^2+3(cos)^2*2x на отрезке если Х на этом отрезке изменяется с шагом 0.2. Найти сумму, произведение, количество, среднее арифметическое,...

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

Дано натуральное число n. Получить все простые делители этого числа
Дано натуральное число n. Получить все простые делители этого числа.

По заданным координатам точек А и В вычислите длину отрезка АВ
Составьте программу, Пример входных данных: ха=10 ya=2 xb=10 yb=7 Пример выходных данных: |AB|=10.0 P.s. Заранее спасибо)

Найдите число десятков в его десятичной записи
Вроде задача легкая, она звучит так...Дано натуральное число. Найдите число десятков в его десятичной записи (то есть вторую справа цифру его десятичной записи). Вот код... program z1; var...

Декомпилятор
Здравствуйте всем. Скажите есть ли декомпилятор exe файлов сделанных на паскале? И если есть где можно скачать

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

С начала суток прошло n секунд. Определить сколько полных часов прошло с начала суток
2. С начала суток прошло n секунд. Определить сколько полных часов прошло с начала суток;

Составьте блок-схему и программу, для вычисления значений функции у в зависимости от заданного с клавиатуры значения аргумента х
3. Составьте блок-схему и программу, для вычисления значений функции у в зависимости от заданного с клавиатуры значения аргумента х:

Заданы три числа a,b,c. Определить могут ли они быть сторонами треугольника
Заданы три числа: a,b и c. Определить, могут ли они быть сторонами треугольника и, если да, определить его тип: равносторонний, равнобедренный, произвольный.

Составьте программу сложения двух простых дробей. Результат должен быть несократимой дробью
Составьте программу сложения двух простых дробей. Результат должен быть несократимой дробью. Используйте подпрограмму вычисления НОД по алгоритму Евклида. Простая дробь задаётся двумя целыми числами:...

Сделать программу которая по номеру дня недели - целому числу от 1 до 7 выдает в качестве результата количество уроков
Сделать программу которая по номеру дня недели - целому числу от 1 до 7 выдает в качестве результата количество уроков в классе в соответствующий день. 1 день-4 урока 2 день-2 урока 3 день-4 урока...

Лапы у гусей и кроликов
Известно, что у кроликов и гусей вместе 64 лапы. Нужно написать все варианты программно. Их всего 17

Найти сумму цифр введенного 4-значного числа
Если можно, то полностью. Зарание спасибо

Ввести символьную строку и проверить, является ли она палиндромом
Ввести символьную строку и проверить, является ли она палиндромом (палиндром читается одинаково в обоих направлениях). Помогите пожалуйста ребята)))!!!

Меньшее из двух чисел заменить половиной их суммы, а большее - их удвоенным произведением
Даны действительные числа Х и У, не равные друг другу. Меньшее из двух чисел заменить половиной их суммы, а большее их удвоенным произведением

Даны действительные числа а,b, с. Удвоить эти числа, если a>b>c, и заменить их абсолютными значениями, если это не так
Даны действительные числа а,b, с. Удвоить эти числа, если a>b>c, и заменить их абсолютными значениями, если это не так.

По введенному k – числу грибов напечатать фразу «Мы нашли в лесу k грибов»
Составьте программу, которая по введенному вами k – числу грибов печатает фразу «Мы нашли в лесу k грибов», причем согласовывает окончание слова «гриб» с k. (Количество грибов может быть любым целым...

Написать программу которая вычисляет наибольший общий делитель двух целых чисел
Написать программу которая вычисляет наибольший общий делителр двух целых чисел Добавлено через 56 секунд program p1; var p, n,m,n1, m1,result: integer; begin writeln ('Введите два числа');...

Как заполнить массив буквами английского алфавита ?
Как заполнить массив (с помощью цикла for) буквами английского алфавита ?

Найти площадь кольца, внутренний радиус которого равен R1, а внешний радиус равен R2
Найти площадь кольца, внутренний радиус которого равен R1, а внешний радиус равен R2 (R1 < R2) Решить в паскале) Плиз решите пожалуйста, за ранее спасибо)

Вычисление сопротивления электрической цепи, состоящей из двух сопротивлений
Делал по этой задаче: 4) Написать программу вычисления сопротивления электрической цепи, состоящей из двух сопротивлений. Сопротивления могут быть соединены последовательно или параллельно. Ниже...

Дана строка, содержащая текст. Найти длину самого короткого слова и самого длинного слова
Дана строка, содержащая текст. Найти длину самого короткого слова и самого длинного слова.

Напишите программу, которая заменяет во всей строке одну последовательность символов на другую
Напишите программу, которая заменяет во всей строке одну последовательность символов на другую. Я пыталась сделать что-то такое, var a: string; b,c,e: integer; d:char; begin write('Введите...

Что такое randomize и random ?
процедура в паскале randomize и random это одно и тоже?

Как записать арктангенс в паскале?
А вообще функция такая: \frac{\arctan\sqrt{x}}{{x}^{2}+0.5 \sin {x}} надо записать в Паскале

Даны два числа.Найти среднее арифметическое их квадратов и среднее арифметическое их модулей
Даны два числа.Найти среднее арифметическое их квадратов и среднее арифметическое их модулей Добавлено через 2 часа 31 минуту Посмотрите. И исправте если не трудно Program f; var a,b:real; ...

даны 2 круга с общим центром и радиусами R1 и R2
Уважаемые форумчане,прошу помощи в решении этой задачи даны два круга с общим центром и радиусами R1 и R2(R1>R2).найти площади этих кругов S1 и S2, а также площадь S3 кольца,внешний радиус которого...

В целочисленных массивах a и b содержатся длины катетов десяти прямоугольных треугольников
В целочисленных массивах a и b содержатся длины катетов десяти прямоугольных треугольников: a - длина первого катета; b - длина второго катета i-го треугольника. Найдите треугольник с наибольшей...

Даны натуральные числа от 35 до 87. Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5
Даны натуральные числа от 35 до 87. Найти и напечатать те из них, которые при делении на 7 дают остаток 1, 2 или 5

Найти сумму чисел от 100 до 200, кратных 17.
Найти сумму чисел от 100 до 200, кратных 17.

Обработка двумерного массива. Найти минимальный и максимальный элемент
В матрице A 4х4 найти минимальный и максимальный элемент,вычеслить P=A min + A max.Построить новую матрицу,в которой к элементам всех строк,кроме второй,прибевлено P,вторая строка без изминений.

По данному действительному числу a и натуральному n вычислите сумму 1+a+a2+...+an, не используя формулу суммы геометрической прогрессии.
По данному действительному числу a и натуральному n вычислите сумму 1+a+a2+...+an, не используя формулу суммы геометрической прогрессии. Время работы программы должно быть пропорционально n. ...

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

Как закрасить фигуру цветом?
Подскажите пожалуйста почему фигура закрашивается белым цветом(точнее как её закрасить цветом, который мне необходим)?:) Program Sushka; Uses Graph; Var Gd,Gm:Integer; Begin InitGraph(Gd,Gm,'');...

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

Запрашивать пароль до тех пор, пока он не будет правильно введен
21. Составить программу, которая запрашивает пароль (например, четырехзначное число) до тех пор, пока он не будет правильно введен. блок схема

Написать программу которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика.
1)Написать программу которая по введенному значению аргумента вычисляет значение функции, заданной в виде графика. Параметр R вводится с клавиатуры. Добавлено через 16 часов 19 минут апп

Определение типа треугольника по длинам сторон
определите, является ли три числа прямоугольным, тупоугольным и остроугольным треугольником

Найти длину окружности и площади круга заданного радиуса
4. Составить схему алгоритма и программу на языке Паскаль для вычисления длины окружности и площади круга заданного радиуса.

Очистка экрана
Добрый вечер! подскажите,пожалуйста,как будет выглядеть код очистки экрана. Например,мы запускаем программу,выполняем какие-нибудь действия(например расчеты) и я хочу очистить экран и выполнять...

Расширить открытое окно Паскаля на весь экран
Как можно расширить открытое окно Паскаля на весь экран?

Даны два действительные числа.Вывести первое число,если оно больше второго,и оба числа если это не так.
Даны два действительные числа.Вывести первое число,если оно больше второго,и оба числа если это не так.(Турбо паскаль)

Программа вычисления корней квадратного уравнения
Сделал программу по вычислению корней квадратного уравнения,когда ввожу числа a,b,c и жму ввод вылазит такая ошибка-"eror 106: invaid numeric format." можете подсказать что не так? program...

Вычислить значение выражения
Всем привет!Прошу проверить мои переводы математических формул на язык паскаль.В файле изображение математических формул,а здесь я выложил перевод на паскаль. 1. (2*cos(x-pi/6))/(1/2+sqr(sin(y)));...

Даны два действительных числа А и В. Получить их сумму, разность и произведение
Даны два действительных числа А и В. Получить их сумму, разность и произведение

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

Ввести с клавиатуры массив из 5 элементов, найти в нем 2 максимальных элемента и их номера
надо сделать полное тело задачи, от program до end) решение любыми способами Ввести с клавиатуры массив из 5 элементов, найти в нем 2 максимальных элемента и их номера. Пример: Исходный массив:...

Дано натуральное число n. Вычислить cos1/sin1 x cos1+cos2/sin1+sin2 x....x cos1+...+cos n/sin1+...sin n
2. Дано натуральное число n. Вычислить cos1/sin1 x cos1+cos2/sin1+sin2 x....x cos1+...+cos n/sin1+...sin n

С начала суток прошло N секунд (N — целое). Найти количество полных часов, прошедших с начала суток.
С начала суток прошло N секунд (N — целое). Найти количество полных часов, прошедших с начала суток.

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

Написать программу которая генерирует 10 случайных чисел
Написать программу которая генерирует 10 случайных чисел в диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее арифметическое.

Определить, является ли целое число N четным двузначным числом.
Определить, является ли целое число N четным двузначным числом.

Убрать лишние знаки после запятой
Допустим, есть число - 5,34932482838349. А нужно, чтобы выводилось только 5,349.

Дано трехзначное число. Будет ли сумма его цифр четном числом
Дано трехзначное число N. Проверить будет ли сумма его цифр четном числом. Прошу срочно помочь пожалуйста. Только без констант

Удалить лишние пробелы
Отредактировать предложение, удаляя из него лишние пробелы, оставляя только по одному пробелу между словами.

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

Выводить числа от 1 до 10
написать в паскаль программу , которая выводит от 1 до 10 Заранее , большое спасибо _)

Спортсмен в первый день пробежал 10 км. Каждый следующий день он увеличивал дневную норму на 10%
Спортсмен в первый день пробежал 10 км. Каждый следующий день он увеличивал дневную норму на 10% от пробега предыдущего дня. Через сколько дней спортсмен будет пробегать в день больше 20 км?

Найти среднее арифметическое положительных элементов массива
Добрый вечер помогите пожалуйста решить задачу и объяснить что к чему.... Вот сама Задача: Дан массив A(20), найти среднее арифметическое положительных элементов массива.

Как запустить написанную программу на выполнение
Помогите запустить Turbo Pascal. Суть проблемы: пишу любую программу, пусть даже самую простую а+б=с, нажимаю Compile или Make - программа пишет, мол, скомпилированно, и все! Что делать?

Перевод всех букв в верхний регистр
Я в паскале ещё тупой не могу написать программу: пользователь вводит слово и программа капсит все буквы

Найти минимальный и максимальный элемент массива.
массив N вещественных чисел, отображаемых на экране найти минимальный и максимальный элемент. заранйе спасибо!!!

Квадратное уравнение
:help:Помогите пожалуста - составил програму для решения квадратного уравниея A*X2+B*X+C=0. Єто уравниние существует квадратным только єсли А неравно 0. Для поиска корней квадратного уравнения нужно...

Найти наименьший элемент массива
zd_2 задан одномерный числовой мас из 10 чисел необходимо найти наименьший элемент массива Требования к заданию а)ввод исх. данных в мас с использованием структуры цикл с предусловием(при отладке...

Дано натуральное число. Найти сумму цифр этого числа
Дано натуральное число: − найти сумму цифр этого числа; − верно ли, что число начинается и заканчивается одной и той же цифрой.

Найти произведение всех целых чисел от 8 до 15
Найти произведение всех целых чисел от 8 до 15 спасибо заранее

Найти количество чисел оканчивающихся на число 6
помогите ,пожалуйста (собрать программу на Pascal) дано произвольное количество чисел. найти количество чисел оканчивающихся на число 6 (цикл работает до тех пор, пока вы не введете отрицательное...

Написать программу, выводящую на экран таблицу умножения на 5
6) Написать программу, выводящую на экран таблицу умножения на 5 (используя цикл с параметром). 7) Решить задачу 6 используя цикл с предусловием 8) Решить задачу 6 используя цикл с постусловием ...

Нарисовать солнце
помогите нарисовать Красивое солнышко в Паскаль!) пожалуйста!!!

Графика в паскале (построить график функции)
Необходимо построить графики заданной функции в паскале. Условие задачи: Построить графики функции, заданной в параметрически, при разных значениях параметра "а" (должна быть реализована...

Перевод из строки в число
У меня задача: Иммется файл, в котором записано 12 вещественных чисел. Переписать все числа файла в массив в том же порядке. Т.е. я счита к примеру дан txt файлик, там числа, вот я хочу узнать а...

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

Turbo Pascal for Windows 7
не могли бы подсказать где можно найти Turbo Pascal for Windows 7.

Закончить выполнение программы после выполнения условия
как закончить выполнение программы после выполнения условия в паскале????

Проверить, выполняются ли неравенства a<b<c
помогите с любой задачей... 1) Даны действительные числа a, b, c. Проверить, выполняются ли неравенства a<b<c. 2) Даны два действительных числа. Заменить первое число нулем, если оно...

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

Вывести на экран квадрат из звездочек
Задание: напишите процедуру,которая принимает параметр-натуральное число N и выводит на экран квадрат из звездочек со стороной N. Вроде делала по заданию, а ошибку не могу понять procedure wr( ch:...

Произведение чисел от 1 до N
Составьте программу, которая вычисляет произведение чисел от 1 до N. Значение N вводится с клавиатуры

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

Составить программу, которая печатает true, если точка с координатами (x,y) принадлежит закрашенной области
Составить программу, которая печатает true, если точка с координатами (x,y) принадлежит закрашенной области, и false в противном случае:

Даны 2 действительных числа, меньшее из них заменить полусуммой этих чисел, а большее их произведением.
Даны 2 действительных числа, меньшее из них заменить полусуммой этих чисел, а большее их произведением.

Составить программу, которая заполняет массив а [1..10] случайными целыми числами в диапазоне от 1 до 10
составить программу, которая заполняет массив а случайными целыми числами в диапазоне от 1 до 10, затем найти произведение элементов с нечетными значениями и количество элементов с четными значениями

Операнды имеют неприводимые типы
Два квадратных уравнения задано своими коэффициентами a1,b1,c1 та a2,b2,c2. Могут ли корни обеих уравнений быть сторонами некоего прямоугольника? var a1,b1,c1,a2,b2,c2,D1,D2,x1,x2,x3:real; begin...

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

Определить, верно ли, что введённое число содержит две одинаковых цифры, стоящие рядом
Напишите программу, которая определяет, верно ли, что введённое число содержит две одинаковых цифры, стоящие рядом (как, например, 221). Входные данные Входная строка содержит одно натуральное...

Подсчитать сумму всех целых чисел от 1 до 100
2. Подсчитать сумму всех целых чисел от 1 до 100. Печатать на экране строки "Сумма чисел от 1 до 100 и значение переменной S.

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

Если целое число m делиться на целое число n, то вывести на экран частное от деления
Помогите пожалуйста решить задачу. Задача: Если целое число m делиться на целое число n, то вывести на экран частное от деления, в противном случае вывести на экран сообщение "m на n нацело не...

Значение функции e^x (экспонента от x) равно сходящейся сумме бесконечного ряда:
Значение функции e^x(экспонента от x) равно сходящейся сумме бесконечного ряда: e^x=1+(x/1!)+(/2!)+(/3!)+...+/n!+... Получите рекуррентную формулу для слагаемых. Используя операторы цикла...

Вывести квадраты и кубы 10 чисел
Вывести квадраты и кубы 10 чисел следующей последовательнсти 1,2,4,7,11,16,22,29,,37,46 (пояснение к 1 прибавить 1 равно 2, к 2 прибавить 2 равно 4, к 4 прибавить 3 равно 7 и т. д.) Пример 1 1...

Найти произведение двузначных нечетных чисел, кратных 13.
Найти произведение двузначных нечетных чисел, кратных 13.

Нахождение длины окружности
написать программу нахождения длины окружности...найти через константу...

Написать программу проверки знания даты начала второй мировой войны
3)Написать программу проверки знания даты начала второй мировой войны. В случае неверного ответа пользователя программа должна выводить правильный ответ. Ниже представлен рекомендуемый вид экрана во...

Напишите программу, которая выводит таблицу умножения
Помогите пожалуйста Написать программу,которая выводит таблицу умножения,например на 7. Рекомендуемый вид экрана во время работы программы приведен ниже.Данные введенные пользователем, выделены...

Смешано V1 литров
Смешано V1 литров воды температуры t1 с v2 литрами воды температуры t2. Найти объём и температуру образовавшейся жидкости.

Как найти максимальный и минимальный элементы массива и их порядковые номера?
Как найти максимальный и минимальный элементы массива и их порядковые номера? Напишите пожалуйста без random чтобы я сам мог ввести числа после нажатия ctrl+f9

Написать программу, которая задумывает число в диапазоне от 1 до 10 и предлагает пользователю угадать число за 5 попыток
Возникла проблема, связанная с отсутствием мозгов ) Дали задание такого типа: Написать программу, которая задумывает число в диапазоне от 1 до 10 и предлагает пользователю угадать число за 5...