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

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

Что делает команда writeln?
Добрый день! в одной программе нашел такую строку - writeln(nf1+' >> '+nf2); что она делает?

Найти произведение чисел от 2 до 7
Помогите с домашкой, пожалуйста. Написать программу к задаче: найти произведение чисел от 2 до 7.

Вывести на экран квадраты и кубы целых чисел от 1 до 8 и наоборот от 8 до 1
Помогите с заданием. Вывести на экран квадраты и кубы целых чисел от 1 до 8, и наоборот, от 8 до 1.

Используя цикл с постусловием и минимально возможное количество переменных, определить N!
Используя цикл с постусловием и минимально возможное количество переменных, определить произведение натуральных чисел от 1 до N. Число N вводится с клавиатуры. Программу пишем на Паскале. Хелп!!...

Перевод в паскаль
привет! переведите пожалуйста код в паскаль /***************************************************************************** * cachegen.c: LibVLC plugins cache generator ...

Составить блок-схему для одномерного массива
Составить блок-схему для одномерного массива program lb16; uses crt; var A.T,D: array of integer; i, n, k, m: integer; r: real; begin clrscr; randomize; write (' vvedite colitechstvo chisel=...

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

Динамический массив, матрица
Пытаюсь создать матрицу через через динамический массив на паскале. Выдает: Ошибка времени выполнения: Индекс находился вне границ массива. Не могу понять в чем дело program task6; var matrix:...

Строка выводящая 25 элементов при помощи команды рандомайз числа от 1 до 5 между которыми должен быть пробел
Program n_1; var f: array of integer; i:integer; begin randomize; for i:=1 to 25 do begin f:=random(6); { интервал } write(f,' '); end;

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

Что такое 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?

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

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

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

Определить,является ли число четным или нечетным.
Добрые люди помогите пожалуйста, скоро экзамен а допуска к нему нет. Надо решить 2 задачи: 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 сравнений, а это много.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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:...

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Нарисовать Звездное Небо
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)Составит программу,которая отгадывает натуральное четное число,,загаданное пользователем. пример:загадайте натуральное...

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

Даны размеры прямоугольных открытки и конверта. Требуется определить, поместится ли открытка в конверт.
ПОМОГИТЕ ПОЖАЛУЙСТА

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

Ввести натуральное число и определить,верно ли,что сумма его цифр равна 10
Помогите с тремя задачками пожалуйста 1)ввести натуральное число и определить,верно ли,что сумма его цифр равна 10 2)составить функцию, которая определяет наибольшее из трёх чисел 3)заполнить...

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

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

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

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

Даны две точки А(х1, у1) и В(х2, у2). Определить, которая из точек находится ближе к началу координат
Даны две точки А(х1, у1) и В(х2, у2). Определить, которая из точек находится ближе к началу координат.pascal

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

Найти сумму положительных нечетных чисел, меньших 100
найти сумму положительных нечетных чисел,меньших 100.

Определить количество элементов массива
Дан числовой массив А, состоящий из n-натуральных чисел. Определить количество элементов массива, являющихся кратными 7. Очень надо, напишите пож прогу)

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

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

Целая часть от деления....
Помогите вычислить целую часть от деления чисел n/m плиззз Добавлено через 15 минут Пы сы: мне надо составить программу в паскале

Ввести номер месяца и вывести название времени года
1 Задача:Ввести номер месяца и вывести название времени года. ПРИМЕР: Введите число месяца 4 весна

Найти площадь кольца,внутренний радиус которого равен r, а внешний - заданному числу R
Найти площадь кольца,внутренний радиус которого равен r ,а внешний-заданному числу R(R>r Уважаемые программисты помогите решить! Спасибо за ранее!!

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

Игра Крестики Нолики на Pascal
Игра Крестики Нолики на Pascal. Игра без ии Program xoy; Uses crt; Const n=7; label goback,ex,nach; var a:array of char;

Метод деления отрезка пополам
Дано действительное положительное число e (эпсилон). Методом деления отрезка пополам найти приблеженное значение корня уравнения f(x)=0. Абсолютная погрешность найденного значения не должна...

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

Перевод из радианов, в градусы.
Угол задан в радианах. Перевести в градусы.

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

Решебник Абрамова по программированию
Привет всем! Кто знает где скачать Решебник Абрамова по программированию? Или у кого он есть скиньте пожулуйста! Очень надо!

Определитель матрицы. Метод Гаусса.
Помогите пожалуйста. Админ привет. это vanHalen с вашего бывшего форума. :-) Задание: Найдите определитеь матрицы n-ого порядка методом Гаусса. Я понимаю что вроде не сложно, но я сам ещё в Паскале...

Программа для вычисления корней квадратного уравнения
Проверьте прошу. Знаю, что слишком детская но все же. Program Korni1; var a, b , c, x, x1, x2, d : real; begin writeln (' Vvedite cisla a,b,c'); readln(a, b, c); d:=sqr(b)-4*a*c; if d<0 then...

Составьте программу, которая из слова ИНФОРМАТИКА получит слова: ФОРМА, ТИК, ФОРТ
Помогите, пожалуйста:cry: Cоставьте программу, которая из слова ИНФОРМАТИКА получит слова: ФОРМА, ТИК, ФОРТ.

Нахождение длины гипотенузы и площади треугольника
составить программу нахождения длины гипотенузы и площади треугольника если известны катеты по формулам в вложении

Определить, сколько амеб будет через несколько часов
одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить, сколько клеток будет через 3,6,9,...,24 часа, если первоначально была 1 клетка.

Паскаль.Ввести номер месяца и вывести количество дней в нем, а также число ошибок при вводе...........
Задание 1. Ввести номер месяца и вывести количество дней в нем, а также число ошибок при вводе. Пример: Введите номер месяца: -2 Введите номер месяца: 11 В этом месяце 30 дней. Вы вводили...

Дано целое число n. Найти сумму ряда чисел n2 + (n+1)2 + (n+2)2 ... (2n)2
Условие:Дано целое число n.Найти сумму ряда чисел n2 + (n+1)2 + (n+2)2 ... (2n)2 Пожалуйста,помогите.Мы начали решать эту задачу,только надо докончить: var n,i,s:integer; begin ...

Создать текстовый файл и прочитать его
Создать текствоый файл и прочитать его. Помогите пожалуйста, а то завтра зачёт(((( А не понятно, как делать номера, подобные даннным(((((

Найти периметр и площадь прямоугольного треугольника
Найти периметр и площадь прямоугольного треугольника, если даны длины его катетов a и b.Решение есть, но я не уверена, что правильное.Помогите:)Спасибо Program Summa; uses wincrt; var...

Подсчитать количество цифр, входящих в строку
Дана строка, содержащая 30 символов. Подсчитать количество цифр, входящих в данную строку.

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

как найти количество четных чисел в массиве
Подскажите ,как найти количество четных чисел в массиве

Определить количество слов в строке
1. Дана строка, состоящая из русских слов, разделенных пробелами (одним или несколькими). Определить количество слов в строке.

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

Найти сумму элементов каждой строки матрицы
помогите вот еще две задачки. 1.Вычислить S=∑_(i=1)^n▒i 2.найти сумму элементов каждой строки матрицы. Заранее сильно благодарен.

Определите, какая из двух точек находится ближе к началу координат
Составьте программу, решающую следующую задачу: Даны две точки с координатами x1, y1, x2,y2. Определите, какая из двух точек находится ближе к началу координат. Исходные данные: х1, у1, х2, у2 -...

Условие if
Добрый день!Не подскажите,как правильно написать if для условия(двойное неравенство) if 5<(abs(sqr(x)+y*y*y)) AND (abs(sqr(x)+y*y*y))<13 program la2; var x,y,u,hx,hy,xn,yn,xk,yk:real;...

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

Сформировать массив случайных чисел и упорядочить его
Доброго времени суток=) как можно сформировать одномерный массив с помощью генератора случайных чисел? массив должен быть из 10 элементов. сгенерировать массив в пределах от -100 до 100. вывести его...

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

Вывести все натуральные числа от 1 до n
написать программу которая выводит на экран все натуральные числа вывести все натуральные числа от 1 до n составить две программы одну с предусловием другую с постусловием

SHR и SHL
Обясните плиз суть операторов shr и shl. Как использовать, на каких типах?

Программа "Вопросы и ответы". Как сделать правильно?
как сделать программу в которой есть вопроса 3-4, и 4 варианта ответа на каждый вопрос ?.. и при это в конце считается кол-во правельных ответов и выдается оценка .. нам на паре говорили через case...

Нахождение среднего арифметического двух чисел
Как записать программу Pascal для нахождения среднего арифметического двух чисел A,B?

Найти факториал числа (цикл While).
Найти факториал числа (цикл While).

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

Сравнение чисел
С клавы вводится два целых числа a и b(оба от -1 000 000 да 1 000 000).Составить программу,сравнивающую эти числа и в зависимости от результата сравнения выводящую на экран нужный знак.например 3=3...

Деление числа
Суть программы: Ввести 4-значн. число Делить его на 15 и вывести целые значения Оч надо и срочно!!!Помогите пожалуйста

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

Написать программу вычисления суммы n слагаемых
1)написать программу вычисления суммы n слагаемых вида x+1, где х-данное число, а i меняется от 1 до n 2)суммы n слагаемых вида (i+1)², где i=1,2,3....n; 3)суммы n cлагаемых вида sinx+...

как сделать переход на новую строку
Привет, такой вопрос: как сделать переход межну строками к примеру написал программу , и вывел 2 текста , как можно добавить переход между текстами ? Я знаю способ writeln(); writeln(); , может кто...

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

Год, года, лет
Есть задача, в которой нужно при вводе допустим цифр "55" программа выдавала годы: Допустим 1 год 2 года 3 года 4 года 5 лет 6 лет и т.д. И так нужно от 1 до 110 Написал простенький код:

Локальные и глобальные переменные.
ОГбьясните пожалуйста чем отличаются Procedure и Function Да и что такое глобальные и локальные переменные P.s прочитал книгу а так и непонел чо это такое и с чем его кушают

Ввести c клавиатуры массив из 5 элементов, умножить их на 2 и вывести на экран
Здравствуйте, помогите решить задачку. Задача: Ввести c клавиатуры массив из 5 элементов, умножить их на 2 и вывести на экран. Вот, что получилось у меня: var M: array of Integer; A, i:...

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

Определить максимум и минимум из 4х чисел, найти разность max-min
определить максимум и минимум из 4х чисел. найти разность max-min как сделать задачу???? Сделайте кто-нибудь

Вывести на экран номер четверти,которой принадлежит точка с координатами (x,y) ,
1)Вывести на экран номер четверти,которой принадлежит точка с координатами (x,y) , при условии ,что x и y отличны друг от друга. 2)Даны 3 целых числа,найти среднее из них.Средним назовём...

Используя только умножение, получить значение a в степени 8 за три операции
Линейная программа. Дано число a. Используя только умножение, получить значение a8 за три операции.

Алгоритм, который устанавливает – является ли число простым
5. Алгоритм, который устанавливает – является ли число N простым. Число называется простым, если оно делится нацело без остатка только на себя и на 1.

Составить алгоритм решения ребуса КОТ+КОТ=ТОК
Пример: http://s42.***********/i095/0901/bf/0417f971c7c0.jpg В моей же задаче: Составить алгоритм решения ребуса КОТ+КОТ=ТОК(различные буквы обозначают различные цифры, старшая не 0) ...

Найти разность двух чисел
Через процедуру найти разность двух чисел (30-20) Только начинаю, объясните пожалуйста.

Программа расчета значения функции
Составить программу расчета значения функции Z=3sin x3-|2.5cos xy+1.8tg x2|+1 при любых x и y помогите написать код программы

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

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

Отрицательная степень числа
Здрасте. помогите кто-нибуь. нужно вычислить любой минусовый степень любого числа, например 3.6^-14 как ето реализировать?если можна в форме функции.

Алгоритм Дейкстры не выводит минимальный путь
поиск минимального пути.Посмотрите что не так,не выводит минимальный путь!Бъемся 3-и недели неможем понять=( Program Alg_dejkstr; Uses Crt; const Infinity=1000; Var D: array of integer; A:...

Написать программу вычисления суммы 1+1/2+1/3+.+1/n для заданного числа n
Написать программу вычисления суммы 1+1/2+1/3+...+1/n для заданного числа n. Результат представить в виде несократимой дроби p/q (p, q — натуральные).Решить задачу с помощью функции или процедуры не...

Является ли число A делителем числа B.
Решите пожалуйста две задачи ! 1.Составьте программу, определяющую, является ли число A делителем числа B. 2. Составьте программу, заменяющую из двух данных чисел меньшее число модулем разности,...

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

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

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

Составьте блок-схему и программу, вычисляющую сумму квадратов чисел от 1 до введенного Вами целого числа n
Составьте блок-схему и программу, вычисляющую сумму квадратов чисел от 1 до введенного Вами целого числа n. Добавлено через 14 часов 20 минут тоже Паскаль

Двумерный массив запись/ чтение из файла
подскажите пожалуйста как считать из файла двумерный массив размера n´n, заполненный случайными числами, и найти номера строк, все элементы которых – нули. Результат записать в файл. Добавлено...

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

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

Квадратное уравнение.
Вот задача которую задал препод Дано уравнение вида: x*x*a+x*b+c=0 .Найти корни x1 ,та x2 Вот как я её сделал. program kv; var a,b,c,D,x1,x2:real; begin Write('a= '); ...

Сортировка матрицы по возрастанию
Задан двухмерный массив A(a_ij), де i=1,2…n , j=1,2…m, элементами которого являются целые числа. Упорядочить информацию в массиве в порядке возрастания. Указания: Изначальный массив задать...

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

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

Error 15: File not found (GRAPH.TPU)
в чём смысл ошибки? нада пересохранить?

Кратность чисел
Дан массив целых чисел, вывести числа кратные 3 без остатка.:D

Определить площадь части прямоугольника расположенной в 1-й части координатной четверти
Заданы координаты вершины (х1,у2,),(х2,у2),(х3,у3),(х4,у4).Определить площадь части прямоугольника расположенной в 1-й части координатной четверти

Что такое temp в Pascal
что такое temp в паскале

Блок-схема с оператором цикла.
Дана задача: Дан одномерный массив В элементы которого формулируются по формуле Bi=i sin i,где i-номер элемента в массиве В .Подсчитать сумму всех отрицательных элементов массива. На экран вывести...

Числа, оканчивающиеся на 5.
Задача состоит в следующем: Составить программу вывода на монитор всех чисел от 1 до N, оканчивающихся 5. Вот листинг программы: program laba3a; uses crt; var n,i,x: integer;

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

Проверить, является ли число N числом Фибоначчи
ДАНО ЦЕЛОЕ ЧИСЛО N(N>1).Последователность чисел Фибоначчи Fk определяется следующим образом: F1=1, F2=1, Fk= Fk-2 + Fk-1, K=3,4... .Проверить,является ли число N числом Фибоначчи.Если...

Заполнить массив членами арифметической прогрессии с начальным значением X и разностью D в обратном порядке
Напишите программу, которая заполняет массив из N элементов членами арифметической прогрессии с начальным значением X и разностью D в обратном порядке, так чтобы последний элемент был равен X . ...

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

Error 200: Division by zero
Народ что значит в Паскале следуйщее: Error 200: Division by zero

Что значит var в параметрах функции
Что значит var в парнаметрах функции, для чего она там? и что изменится если убрать var? function name (var a:integer) { }

Программа преобразует строку, содержащую имя, отчество и фамилию человека, к форме
Привет!Решаю тут задачки Полякова) И всё не могу теперь) Вот условия: Напишите программу, которая преобразует строку, содержащую имя, отчество и фамилию человека, к форме <фамилия> <инициалы> ...

Посчитайте, сколько чисел содержится одновременно как в первом списке, так и во втором
Даны два списка чисел, которые могут содержать до 100000 чисел каждый. Посчитайте, сколько чисел содержится одновременно как в первом списке, так и во втором. Примечание. Эту задачу на Питоне...

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

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

Нахождение обратной матрицы
помогите пожалуйста нужна БЛОК СХЕМА и ПРОГРАММА на нахождение обратной матрицы, (паскаль)

Паскаль ? Что эот означает Write(a:1:1); эти 1 и 1
Паскаль ? Что эот означает Write(a:1:1); эти 1 и 1

Поставить пробелы
Есть задача: Дана строка, состоящая из нескольких слов, между соседними словами не менее одного пробела, за последним словом - точка. Во все слова, за первым символом, вставить пробел. т.е нужно...

Определить количество положительных и количество отрицательных элементов массива
определить количество положительных и количество отрицательных элементов массива

Определить, как изменятся площадь, урожайность и урожай ячменного поля за заданное количество лет
В некотором году (назовем его условно первым) на участке в 100 гектаров средняя урожайность ячменя составила 20 центнеров с гектара. После этого каждый год площадь участка увеличивалась на 5%, а...

Как разделить число по разрядам
Здравствуйте! Есть задачка, знаю, что она школьного уровня, но я на ней весь мозг сломал. Условие следующее: надо через операции div и mod разбить вводимое число на разряды. То есть, вводят число...

В данной строке вставьте пробел после каждого символа.
Помогите решить задание: В данной строке вставьте пробел после каждого символа.

Помогите написать троян на pascal
Помогите написать троян на pascal другу хочу закинуть.

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

Записать формулы на языке Паскаль
1. Переведите математическую формулу на язык Паскаль. нужны скриншоты ваших кодов в программе с результатами работы 3 Примера во вложение 1 2. Составить программу вычисления функции у(х);...

Нарисовать автомобиль в Pascal
помогите пожалуйста нарисовать автомобиль, самый простой, в Pascal. Заранее спасибо))

Могут ли в некотором подъезде первая и последняя квартиры иметь заданные номера?
В доме несколько подъездов. В каждом подъезде одинаковое количество квартир. Квартиры нумеруются подряд, начиная с единицы. Может ли в некотором подъезде первая квартира иметь номер x, а последняя —...

Определить, сколько символов * выведет процедура при вызове F(35)
Определите, сколько символов * выведет эта процедура при вызове F(35): procedure F( n: integer ); begin write('*'); if n >= 1 then begin write('*'); F(n-1); F(n-2); ...

округление
помогите вспомнить какие числа нужно писать в ответе чтобы округлить ответ Пример WriteLn(Res : ? : ?), где Res результат(число которое нужно округлить до целого), а ? - число которое я не могу...

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

Запишите по правилам паскаля следующие выражения.
Запишите по правилам паскаля следующие выражения : 1). a+b^2/1-a 2) x-y/x^2+10 3)|10-корень из |x-5|

Ожидалось имя процедуры или функции
Подскажите в чем ошибка. Программа в общем виде делает из строки fffddaaar строку 3fdd3ar Но почему то при запуске выскакивает ошибка рядом с Str(h,s); "Ожидалось имя процедуры или функции" Как...

Вычислить сумму первых n членов ряда
Написать программу, которая вычисляет сумму первых n членов ряда 1+ ½+1/3+1/4+…Количество суммируемых членов ряда задается во время работы программы.

Вычислить сумму первых ста натуральных чисел
вычислить сумму первых ста натуральных чисел!срочно!

Дан массив размера N и целые числа K и L (1 < K ≤ L ≤ N). Найти среднее арифметическое всех элементов массива, кроме элементов с номерами от K до L вк
Array6. Дан массив размера N и целые числа K и L (1 < K ≤ L ≤ N). Найти среднее арифметическое всех элементов массива, кроме элементов с номерами от K до L включительно. Добавлено через 2 часа 29...

Найти площадь треугольника по трем сторонам
найти площадь треугольника, если известны 3 стороны а,в,с нужно сначала проверить существует ли треугольник я написал: program q; var p,a,b,c:integer; s:real; begin p:=a+b+c;

Массив неизвестной размерности
Можно ли в Паскале задать массив неизвестной размерности? Если да, то как? Мне нужно сначала объявить этот массив, а его размерность программа должна потом считывать...

Поиск строк в файле (паскаль)
Условие: Заданный текстовый файл F, строка букв S. Получить все строки файла F, что содержат строку S. Вот такая вот задачка, помогите решить.

Онлайн компилятор паскаля
Проблема заключается в следующем: Написал программу к одной задаче: program tochka; type per=^s; s=record x,y:longint; col:string; end; var

Вывести на экран все четные числа от 5 до 50
вывести на экран все четные числа от 5 до 50

Какой Паскаль и как установить на Windows 8
Как на WIndows 8 установить?

Минимальное значение Integer
Всем доброго дня. В Паскале существует константа MaxInt для максимального значения типа Integer. Существует ли подобная константа для минимального значения или нужно прописывать вручную?

Цикл с шагом
Помогите исправить программу... смотрел на форуме похожие задачки, но все равно мне с шагом не понятно((( почему-то h не изменяется от 12 до 21, а зацикливается на 21...вот прога) Program Lab_53;...

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

Заполнить массив из 10 элементов случайными числами в интервале [-10..10] и отсортировать по убыванию
Заполнить массив из 10 элементов случайными числами в интервале и отсортировать по убыванию.

Определите значение переменной c после выполнения следующего фрагмента программы
22) Определите значение переменной c после выполнения следующего фрагмента программы: a := -2; b := -3; a := b + a*3; if a < b then c := a - b else c := b – a; 1) 12 2) –6 3) 6 4) –12

Напишите программу определения суммы фруктов, которые магазин продал в каждый из дней
Фруктовый магазин продаёт яблоки по А руб.за кг., груши по В руб. за кг., апельсины по С руб. за кг.В первые два дня недели продано: понедельник - Х кг. яблок, Y груш, Z апельсинов; вторник-X яблок,Y...

Определить сколько цифр в числе
на завтро надо очень срочно %) помогите пожалуйсто! я нечего непонимаю в етом програмиривание]:-> 1. Дано натуральное число N.Найти все целые числа,которые небольше N ,и делителями которих...

Написать схему алгоритма и программу для вычисления значения функции
Написать схему алгоритма и программу для вычисления значения функции: y=\begin{cases}0 & \text{, npu } x\,<\,0 \\\\ \frac{1}{x^2+1} & \text{, npu } 0\leq x\leq 1 \\\\ x^3 & \text{, npu }...

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

После каждого символа ‘.’ вставить пробел, а следующее слово начать с большой буквы
Дана строка символов. После каждого символа ‘.’ вставить пробел, а следующее слово начать с большой буквы. Добавлено через 3 часа 38 минут ну так что поможет кто?? вот я пытался сделать но не...

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

Вывести на экран таблицу квадратов первых десяти положительных чисел
program prog; var i:integer; begin for i:=1 to 10 do Writeln('i*i'); end. так правильно??

Остаток от деления.
с клавиатуры вводится число если остаток от деления его на 4 равено нулю,то увеличить его значение на единицу. если остаток от деления =1, то уменьшать его значение на единицу. во всех остальных...

Даны три целых числа. Найти сумму двух наибольших из них
1)Даны три целых числа. Найти сумму двух наибольших из них. Входные данные: 3 целых числа A,B,C(-1000<=A,B,C<=1000) Выходные данные : сумма двух наибольших из них. Ввод 5, 2 , -13 вывод 7...

Проверка корректности расстановки знаков препинания
По правилам пунктуации пробел может стоять после, а не перед каждым из следующих знаков: . , ; : ! ? ) ] } …; перед, а не после знаков: ( uses crt; const pered=','}']; posle=; probel=;...

Метод Трапеций
Добрый день. Знаю что раньше эта тема возможно обсуждалась но все же обращусь ко всем за помощью. Необходимо написать программу по методу Трапеций. Заранее благодарен за ответы. Функция имеет вид:...

Запиши словесное описание фрагмента алгоритма на языке Паскаль:
Запиши словесное описание фрагмента алгоритма на языке Паскаль: 1) Если число Х равно 47, то увеличить переменную Х на 15, иначе уменьшить на 36; 2) Если переменная S не равна 21, то увеличить...

Найти наименьшую цифру в числе
1)Дано натуральное число n, надо наити наименьшую цифру в числе. 2)В диалоговом режиме вводится некоторое число N (В диапазоне от 1 до 2000). Программа должна вывести числа, определенные заданием в...

найти код символа
Помогите решить задачу. Что-то заклинило. Дан символ С. Вывести его код (то есть номер в кодовой таблице)

Определить сумму элементов массива N, кратных трем
Определить сумму элементов массива N, кратных трем (если не трудно можно блок схему)

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

Разложение числа N на цифры.
Я решил задачу, программа работает. Но мне кажется что я написал бред. Будут интересны ваши комментарии. Задача: Разложить число на цифры и узнать их количество. Число вводиться с клавиатуры. Код...

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

Вывести данное значение длительности в часах, минутах и секундах
18. Дано натуральное число T, которое представляет длитель¬ность прошедшего времени в секундах. Вывести данное значение длительности в часах, минутах и секундах в следующей форме: НН ч ММ мин SS с. ...

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

Найти количество натуральных чисел, не превосходящих N и не делящихся ни на одно из чисел 2, 3, 5
Задано натуральное число N. Найти количество натуральных чисел, не превосходящих N и не делящихся ни на одно из чисел 2, 3, 5. оч нужно решить..

Не пользуясь никакими другими операциями,кроме умножения,получить а в 13 степени за пять операций
Дано действительное число а.Не пользуясь никакими другими операциями,кроме умножения,получить а в 13 степени за пять операций

Компиляция и запуск программ на языке Pascal из cmd
Здравствуйте, программисты. Блуждал по форумам, но ответа так и не нашел. В общем, есть у меня какой-то .pas файл. Находится он в директории "D:\" Нужно запустить компилятор (Тот же FPC или...

Определение количества цифр в записи произвольного натурального числа
Попросили создать. Нужно решение следующих заданий 1) Составьте программу для определения количества цифр в записи произвольного натурального числа. Используйте оператор @while@ 2) Составьте...

Найти минимальный элемент одномерного массива
Помогите,пожалуйста!!! Найти минимальный элемент одномерного массива описав процедуры ввода элементов массива и нахождение минимального элемента массива. Заранее спасибо!!!

Перевод из string в real
В общем: мне нужно перевести из величины string в величину real (НЕ INTEGER), мне нужна команда, вроде strtoint(a,b), только strtoreal(a,b), только она, скорее всего по-другому как-то пишется....

Найти площадь треуголльника,две стороны которого равны a и b , а угол между ними y.
плизз помогите люди!!!!!! 1задача. найти площадь треуголльника,две стороны которого равны a и b , а угол между ними y. 2задача. даны длины сторон прямоугольного параллепипеда.найти его обьем...

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

Найти все натуральные числа a, b, c из интервала от 1 до 20, для которых выполняется равенство: a+b^2=c^2
Найти все натуральные числа a, b, c из интервала от 1 до 20, для которых выполняется равенство: a+b^2=c^2

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

В заданном диапазоне найти количество чисел, удовлетворяющих заданным условиям, и минимальное из них
Написать две программы на языке программирования паскаль, для каждой задачки. 1) Рассматривается множество целых чисел, принадлежащих числовому отрезку , которые удовлетворяют следующим условиям: −...

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

Метод половинного деления
1. составить программу на языке паскаль для вычисления корней уравнения методом половинного деления Точность вычислений 10 (в -3 степени) 3х-0,9*Cosx-1=0 2. составить программу на языке...

Вывести на экран все буквы от ‘a’ до ‘z’.
ребенку задали в школе данные задачи, так как, ни я, ни жена не смыслим в программировании, прошу помочь. Задача 1. Вывести на экран все буквы от ‘a’ до ‘z’. Задача 2. N чисел сгенерировать с...

Замена символов в строке
Помогите составить блок-схему по данному заданию: 1. Дана строка (её вводит пользователь) например: аоывпрутабврагргабв 2. Заменить в строке символы абв на АБВ (но только если символы абв стоят...

Ограничение числа до определенного знака
Дано задание вывести число, с точностью до E=0.00001. Это значит что надо обрубить цифры после 5 знака после запятой, или как?

Даны целочисленные координаты точки на плоскости.Если точка не лежит на координатных осях,то вывести 0...
1 задача! Даны целочисленные координаты точки на плоскости.Если точка не лежит на координатных осях,то вывести 0.Если точка совпадает с началом координат,то вывести 1. Если точка не совпадает с...

Знайти середнє арифметичне елементів кожного з непарних стовпців
Задано квадратну матрицю A розміром N x N (N<=10), що складається з дійсних елементів. Знайти середнє арифметичне елементів кожного з непарних стовпців цієї матриці. Хелп плиз....запутался:(......

Рекурсия. Найти сумму цифр заданного натурального числа.
Найти сумму цифр заданного натурального числа

Найти сумму нечетных элементов массива из 20 элементов
помогите дописать код var a: array of integer; i, sum:integer; begin For i:=1 to 20 do if i mod 2 = 1 then sum := sum+a; Writeln(sum); end.

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

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

Найти НОК
Найти НОК(а,с). (НОК(а,с)=а*с/НОД(а,с)).

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

Геометрическая прогрессия
Нужно найти: 1+a+a²+a³...+a в n-ой степени. По заданным a и n, не используя формулу суммы, решить. Попробовал так: uses crt; var a,n,q:longint; s,z,x,g:real; begin clrscr; readln(a,n); s:=1;...

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

Заменить все чётные элементы массива на их квадраты, а нечётные удвоить
Задача на массивы: "Заменить все чётные элементы массива на их квадраты, а нечётные удвоить." заранее спасибо)

Определитель матрицы
Народ помогите,не пойму почему прога не работает: program fav; const n=3; var i,j,k:integer; A:array of real; detA:real; pr:real; begin writeln('Westi a');

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

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

Задача о рюкзаке
Имеются m предметов с номерами от 0 до m-1, для каждого из которых известна масса в килограммах pj и стоимость cj (j = 0,1,…,m-1). Определить, какие предметы необходимо положить в рюкзак, чтобы их...

задания на циклы
1. Даны два целых числа A и B (A < B). Найти сумму всех целых чисел от A до B включительно. 2. Даны два целых числа A и B (A < B). Найти произведение всех целых чисел от A до B включительно....

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

Создать блок-схему алгоритма вычисления суммы ряда
y=sinx=1-x^3/3!+x^5/5!-…+(-1)^n* (x^(2n+1))/(2n+1)!+...+ блок-схема от чего оттолкнуться?

Попадает ли точка в круг радиуса
написать программу при помощи команды if Определить попадает ли точка с координатами X, Y в круг радиуса r? Уравнение окружности sqr(r)=sqr(X)+sqr(Y) на паскале

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

Тест по Структуры и алгоритмы обработки данных очень прошу проверьте пожалуйста мои ответы
Я ответы проставила ,проверьте пожалуйста Какие условия необходимы для применения простейшей карманной сортировки +все ключи - целые числа от 1 до n +все ключи - различные допускаются...

Даны целые числа n, a1, a2,…, an. Найти наибольший элемент
не пугайтесь..не закрывайте эту теммуу..помогите чем можете(( в особенности последние задачиююсессия 12 янвааряяяя((( ЗАДАЧИ 51.Даны целые числа n, a1, a2,…, an. Найти наибольший элемент. 52.Даны...

Дано трехзначное число. Определить является ли произведение его цифр трехзначным числом
Дано трехзначное число. Определить является ли произведение его цифр трехзначным числом. Заранее спасибо;)

Найти сумму цифр числа
сама задача дано 6-значное число надо узнать его сумму цифр, потом суму цифр его цифр, и так далее до тех пор пока она не станет однозначным числом var k,a:longint; begin read (a); while...

Сортировка массивов
Я вообще не понимаю как сортировать массивы,приведи те кто-нибудь пример сортировки самым простым способом.....

Нарисовать параболу точками
Объясните пожалуйста.Вот организовал такой цикл: l:=1; for i:=1 to 120 do begin putpixel(120+l,round(650/-l)+300),4); l:=l+2; end; Как его переделать чтобы нарисовать параболу точками.

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

Составить программу, определяющую сторону и периметр квадрата по его площади
Дано действительное S – площадь квадрата. Составить программу, определяющую его сторону и периметр.

Как использовать директиву forward?
Если не трудно, оставьте пример проги, в которой используется директива forward. Содержание не важно - главное, как использовать forward

Найти и вывести все номера четных элементов массива, стоящих на нечетных местах
Найти и вывести все номера четных элементов массива, стоящих на нечетных местах.

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

Составить программу решения СЛАУ методом Зейделя
пмогите,пожалуйста,написать программку на паскале для системы уравнений методом ЗЕЙДЕЛЯ... вот,собственно,сама система: 2 х1 + 4 х2 - х3 = 5 - х2 + 2 х2 + 4 х3=5 5 х1 + х2 - х3 = 5 если кто...

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

Программа, рисующая дом
Данная программа нарисует дом, введите следующее: Uses graphABC; begin line(100,100,150,50); line(150,50,200,100); line(200,100,100,100); floodfill(120,90,clgreen); SetBrushcolor(clred);...

Преобразование инфиксной записи в префиксную
Преобразовать выражение в инфиксной форме в префиксную .Операнды представляют собой переменные с однобуквенным идентификатором или (и) цифры от 0 до 9, и в выражении используются только операции «+»,...

найти сумму первых пяти элементов массива
найти сумму первых пяти элементов массива

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

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

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

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

Разбиение строки из 50 букв на 5 строк по 10 букв
Текст задачки приблизительно такой: Необходимо строку из 50 букв. Программа должна разделить эту строку на 5 строк по 10 букв... т.е. к примеру строка из 15 символов q w e r t y u i o p a s d f g...

Цикл для вычисления факториала
Подскажите написать цыкл для вычисления факториала с основанием не четных чисел. Пример через рекрусивную фукцию: function fact (n:integer):integer; begin if n=1 then fact:=1 else...

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

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

Определить средний балл и подсчитать количество удовлетворительных, хороших и отличных оценок
ввести оценки студента по 5 экзаменам. Определить средний балл и подсчитать кол-во удовлетворительных, хороших и отличных оценок. Написать название предмета, если есть неуд

Дано двузначное число. Определить, какая из его цифр больше, первая или вторая(Pascal)
Дано двузначное число. Определить, какая из его цифр больше, первая или вторая.

Решение уравнения
Помогите! Составьте блок-схемы алгоритмов решения задач и программы на языке PASCAL разными способами с использованием: 1)операторов условного (IF) и безусловного переходов (GOTO); 2)цикла с...

Подсчитать количество чисел кратных 7
хотел спросить как подсчитать количество чисел в заданном диапозоне.

Как возводить в квадрат И что значит sum?
Как возводить в квадрат И что значит sum?

Определить угол между положением часовой стрелки
Даны целые числа h,m,s(0<h<23, 0<m<59,0<s<59), указывающие момент времени h часов, m минут, s секунд. Определить угол(в градусах) между положением часовой стрелки в начале суток и в указанный момент...

Среднее арифметическое введенных чисел
Условие: Целые числа вводятся с клавиатуры, пока не будет введен 0 (значение 0 не является членом последовательности). Вычислите среднее арифметическое введенных чисел с точностью до тысячных...

Отсортировать массив по неубыванию методом "выбор максимума"
Требуется отсортировать массив по неубыванию методом "выбор максимума". ВХОДНЫЕ ДАННЫЕ В первой строке вводится одно натуральное число, не превосходящее 1000 — размер массива. Во второй строке...

Вычисление интеграла методом средних прямоугольников
{ Вычисление интеграла методом средних прямоугольников } var n : integer; s: real; function f(x:real):real; begin f:=1-0.25*sin(x)*sin(x); end;

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

факториал ( c рекурсивный функцией )
uses crt; function faktorial(n:integer):integer; begin if n=0 then faktorial:=1 else faktorial:=n*faktorial(n-1); end; var k:integer; begin

Создайте массив А[1..8] с помощью генератора случайных чисел с элементами от –10 до 10
Создайте массив А с помощью генератора случайных чисел с элементами от –10 до 10 и выведите его на экран. Подсчитайте количество отрицательных элементов массива. -вот такая у меня проблемка:help:

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

201: Ошибка Проверки диапазона
Дарова Всем) Столкнулся с теоретически невозможной ошибкой (!=) округления Real-дробного числа на таком участке кода: drwX1:=round(X1); drwX2:=round(X2); drwY1:=round(Y1);...

Вычислить интеграл с помошью квадратурной формулы Гаусса
Задание: Вычислить определенный интеграл, используя квадратурную формулу Гаусса с тремя узлами для числа разбиения отрезка интегрирования n=1. Определить погрешность результата. Подынтегральная...

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

Арифметическое переполнение
У меня проблема: все программы выдают арифметическое переполнение. В универе дали методичку перевести паскаль в асм, но проблема в том что те примеры на паскале - дают арифметическое переполнение....

Как правильно написать sin в квадрате(х-а)?
Как правильно написать sin в квадрате(х-а)? (роw(sin,2)*(х-а))

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

Разложение числа на простые множители
Составить программу разложения данного натурального числа на простые множители. Например, 200 = 23 × 52 .

Поменять местами столбцы матрицы
Дана матрица размером M×N. Поменять местами заданные столбцы с номерами n1 и n2. Отпечатать полученную матрицу по строкам. Написать программу, аналитический профиль, временная и объемная...

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

Удаление записи из типизированного файла.
Какими способами можно реализовать данную задачу? Из типизированного файла нужно удалить запись, номер которой указывается пользователем. Программу писать не обязательно, просто подкиньте идею =)

Вывести четные элементы массива
Требуется написать программу Сначала задано число N - количество элементов в массиве. Далее через пробел записаны N чисел - элементы массива. Необходимо вывести все четные элементы массива (то есть...

Шахматная доска и натуральные числа
1.Вычислите сумму квадратов N четных натуральных чисел. (1+2)*(1+2+3)*…..*(1+2+…..+10); 2.Напишите программу, которая выводит на экран изображение шахматной доски.Черные клетки отображать...

Как создать текстовый файл?
скажите, пож-та, а как должен выглядеть этот самый текстовый файл в Паскале? мне нужно указать в нем массив из n символов, а каким образом их туда записать я не знаю. Элементы массива указывать ч/з...

Отгадать загаданное число
Здравствуйте,помогите пожалуйста написать код.Вася загадал число от 1 до N. За какое наименьшее количество вопросов (на которые Вася отвечает "да" или "нет") Петя может угадать Васино число? Входные...

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

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

Как некоторой организации получить 185 кг мастики не вскрывая ящики
составить программу или подпрограмму . Вводимое число может содержать до 10 цифр. в магазине имеется мастика в ящике по 16,17,и 21 кг.как некоторой организации получить 185 кг мастики не...

Определение произведения членов арифметической прогрессии, начиная с первого по 20-й
1.Дана арифметическая прогрессия с первым членом 0.3 и разностью 0.2. Записать программу определения произведения членов прогрессии, начиная с первого по 20-й. 2.Как сюда можно применить...

Требуется посчитать сумму целых чисел от 1 до N.
сделал. тестил раз 10 писал разные числа все робит но на сайте http://www.acmp.ru/ непроходит 3-й тест где ошибка или недочет??? вот условие: Требуется посчитать сумму целых чисел от 1 до N....

По введённому дню недели определить,рабочий или выходной день.
По введённому дню недели определить,рабочий или выходной день.

Дано целое число. Вывести его строку-описание вида «отрицательное четное число», «нулевое число »,« положительное нечетн
Дано целое число. Вывести его строку-описание вида «отрицательное четное число», «нулевое число »,« положительное нечетное число »и т. д.

Что будет выведено на экран, после выполнения данной программы:
Что будет выведено на экран, после выполнения данной программы: 1) a=8, n=5 Program Primer; Var x, y:integer; Begin Read(a,n); if a<=10 then ...

Ввести адрес файла и разобрать его на части
Помогите с решением. УСЛОВИЕ: ввести адрес файла и разобрать его на части ,разделённые знаком '/'.Каждую часть вывести в отдельной строке. РЕШЕНИЕ: var s,s1:string; i,n:integer; f,g:text;...

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

Даны два ненулевых числа. Найти сумму, разность, произведение и частное их модулей.
Составить программу для решения задачи: даны два ненулевых числа. Найти сумму, разность, произведение и частное их модулей.

Найти n-ное число Фибоначчи.
Помогите пожалуйста решить задачу: Найти n-ное число Фибоначчи. Нужно решить без рекурсии и без массивов, в этом то и вся сложность... Я, в принципе, придумал решение, но оно походит только для...

Дано вещественное число A и целое число N (> 0). Используя один цикл, вывести все целые степени числа A от 1 до N.
Дано вещественное число A и целое число N (> 0). Используя один цикл, вывести все целые степени числа A от 1 до N и используя цикл с параметром

Игра "Камень, ножницы, бумага"
составить программу игры"камень,ножницы,бумага".Для двух играющих- пользователя и компьютера.каждый из них должен выбрать один из 3-х упомянутых предмета.победитекля опред. по правилу:бумага прячет...

Алгоритм «пузырьковой» сортировки
алгоритма простой «пузырьковой» сортировки

Определить количество натуральных чисел из интервала от 100 до 500, сумма цифр которых равна 15.
Помогите пожалуйста решить две задачи. Очень прошу. Срочно! Заранее благодарен =) Вот собственно условие: 1. Определить количество натуральных чисел из интервала от 100 до 500, сумма цифры которых...

Определить, образуют ли точки выпуклый четырехугольник
люди помогите решить задачу Даны координаты четырех точек (x1,y1), (x2,y2), (x3,y3), (x4,y4). Необходимо определить, образуют ли они выпуклый четырехугольник. Ввод : координаты точек в порядке...

Перевод из системы счисления 16 в 10
Напишите программу, которая бы вводила,выводила шестнадцатиричные числа и переводила их в десятичную систему счисления))) помогите пожалуйста

Найти среднее арифметическое всех элементов массива
Задан массив X={Xk},k=1,n,n<=20 элементов. Найти среднее арифметическое всех его элементов.Если не трудно с блок-схемой и циклической программой на ПАСКАЛЕю

Найти все четырёхзначные числа, у которых сумма крайних цифр равна сумме средних цифр, а само число делится на 6 и 27.
Помогите решить ещё одну задачку :) Найти все четырёхзначные числа, у которых сумма крайних цифр равна сумме средних цифр, а само число делится на 6 и 27. За ранее всем спасибо :-)

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

Вычисление периметра и площади прямоугольника, через данные из файла
Помогите написать программу вычисления периметра и площади прямоугольника, через данные из файла и запись результата в другой. Например - input.txt: 5 10 output.txt: 30 50 Набросок (без...

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

Создать одномерный массив из 10 целых чисел (ввод производится с клавиатуры).
Создать одномерный массив из 10 целых чисел (ввод производится с клавиатуры). Отсортировать элементы массива с 3-его по 8-ой по возрастанию. Заранее благодарен!

Найти сумму четных чисел в промежутке
Дан промежуток чисел от 1 до 20 Найти сумму всех четных чисел етого промежутка используя цикл for и if (для нахождения четных чисел) Заранее спс!

Создать двумерный массив с рандомными числами
Задание такое: Создать 2х мерный массив с рандомными числами размерностью 5*5 Из этого 2х мерного массива создать 1 мерный массив, потом заполнить этот массив элементами 2хмерно масива у которых...

Рассматривается множество целых чисел, принадлежащих отрезку
Рассматривается множество целых чисел, принадлежащих отрезку , которые делятся на 2 и не делятся на 7, 11, 13 и 23. Найдите количество таких чисел и минимальное из них. В ответе запишите два числа...

Определить символ, который чаще всего встречается в файле между двумя одинаковыми символами
Дана задача, условие которой Текстовый файл содержит только заглавные буквы латинского алфавита (ABC…Z). Определите символ, который чаще всего встречается в файле после двух одинаковых символов....

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

Даны 3 числа, подсчитать количество четных и не четных чисел
Даны 3 числа, подсчитать количество четных и не четных чисел :D

Определить среднюю температуру воздуха
определить среднюю температуру воздуха за период трех осенних месяцев: сентября, октября и ноября если известны ежедневные температуры этих месяцев

Массив. Поменять местами наибольший и наименьший элементы массива
Дан массив Z(5) поменять местами наибольший и наименьший элементы этого массива. вывести полученный массив Z

Написать программу,которая вычисляет сумму первых n членов ряда
помогите пожалуйста решить задачки: 1. Написать программу,которая вычисляет сумму первых n членов ряда 1,3,5,7... Количество суммируемых членов ряда задается во время работы программы. 2....

Сортировка массива методом "пузырька"
Cортировка массива методом "пузырька" Програма реализирует масив состоящий из string типов елементов и их сортирует до указынавого елемента с меншего до большего , а дальше (после указынавого...

Дано целое число N(>0).используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр.
помогите, пожалуйста Дано целое число N(>0).используя операции деления нацело и взятия остатка от деления, найти количество и сумму его цифр.

Составить программу сокращения дроби
Здраствуйте! Прошу помощ! Программу надо написать в паскале.... 12.Составить программу сокращения дроби , где M и N натуральные числа... Я просо уже весь мозг переломал... инете, перепробывал...

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

Найти определитель матрицы
Напишыте плиз прогу (или кусок) которая находить детерминант матрицы NxN, где N вводят с клавиатуры.......... Главное саму формулу напишыте.....

Найти синус угла между векторами.
а = {1,5; 3; 6.7; -8}, B = 4; 6; -7.2; -9} Найти синус угла между векторами. применить вспомогательные алгоритмы, чтобы вычислить длину вектора.

Найдите сумму четных чисел от 1 до n
Найдите сумму четных чисел от 1 до n, где n <=100 и вводится с клавиатуры.

Даны стороны прямоугольника. Определить его периметр и длину диогонали.!!!!!!!!!
Даны стороны прямоугольника. Определить его периметр и длину диогонали.!!!!!!!!! Зарания СПОСИБО !!!! СПОСИБО !!!!! СПОСИБО !!!!!!!СПОСИБО !!!!!

Задача на скорость и расстояние
Здравствуйте! Помогите решить программу. Pascal. Скорость первого автомобиля V1 км/ч, второго - V2 км/ч, расстояние между ними S км. Определить расстояние между ними через T часов, если...

найти сумму 1! +2! + 3! + ... + N!
Помогите, пожалуйста, понять. Дана задача: For20°. Дано целое число N (> 0). Используя один цикл, найти сумму 1! +2! + 3! + ... + N! (выражение N! — N-факториал — обозначает произведение всех...

Метод Ньютона (касательных)
На Паскале Решить уравнение x3+3х2-24x-10=0 методом Ньютона (касательных) c точностью Е=10-9

Даны три числа A, B, C, написать программу поиска максимум и минимум
Здравствуйте! Помогите, пожалуйста, в оформлении задачи: Даны три числа A, B, C, написать программу поиска максимум и минимум, максимум поместить в переменную max, минимум поместить в...

Runtime error 207. В чём причина?
Program Lab6; Var f:text; name:string; Y:array of integer; k,i,Nb,Ne:integer; r:integer; G:real; Fl:boolean; ...

Как вывести множество
Подскажите как вивести множество

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

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

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

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

Возведение в степень
Просто написать возведение в степень в цикле к примеру для двойки. Степень задает пользователь

Принадлежность точки заданной области
Помогите с решением задач. Спасибо. 1. Даны действительные числа x, y. Определить, принадлежит ли точка с координатами х, у заштрихованной части плоскости. рис. 2. Пусть D - заштрихованная...

Вычисление суммы чисел от 1 до 10, используя циклы repeat и while
У меня получился такой код(смотреть ниже). Но расчет не идет. Почему? var i, sum: integer; тело процедуры: begin if (radiobutton1.checked) then {begin sum := 0; i := 1; while i <...

Цикл: Найти сумму всех n-значных чисел
Найти сумму всех n-значных чисел (1 ≤n ≤ 4).

Как записать вектор?
Очень нужна ваша помощь в решение задачи. Вчера только узнал о векторах и массивах и поэтому слабо в этом разбираюсь. Еще я не нашел как в Паскале пишется нижний индекс(subscript) :( "Дан...

Неверная вещественная операция
не знаю в чем проблема!! выдает: неверная вещественная операция строка 28 program Anal; uses crt; var x,r,z1,z2,z3,s:real; const a=2; b=1; ...

Решение нелинейных уравнений методом Ньютона
решить методом касательных(метод ньютона). на промежутке (1;3) 2*(ln(x))^2+6*ln(x)-5

Real и остаток от деления
Добрый день, есть такая проблема. У меня есть переменные типа Real, при этом после запятой у чисел только нули (т.е. числа целые) и мне нужно использовать операцию mod с ними. Сделать их integer...

определить пройдет ли кирпич с ребрами а, b, с в прямоугольное отверстие со сторонами х, у
определить пройдет ли кирпич с ребрами а, b, с в прямоугольное отверстие со сторонами х, у

Поменять местами значения целых переменных A, B, C таким образом, чтобы оказалось A ≥ B ≥ C
Поменять местами значения целых переменных A, B, C таким образом, чтобы оказалось A ≥ B ≥ C

Крестики-нолики
11. Квадраты при игре в крестики-нолики занумерованы, как показано на рисунке. Заданы номера трех квадратов: N1, N2, N3, причем N1<N2<N3. Проверить, лежат ли квадраты: • На одной диагонали • На...

Дана строка. Вывести строку, содержащую те же символы, но расположенные в обратном порядке.
Дана строка. Вывести строку, содержащую те же символы, но расположенные в обратном порядке.

Определить длину периода дроби
Рассмотрим дробь 1/n, n>1. Как известно, цифры в её десятичной записи начиная с некоторого места повторяются. Минимальную по длине повторяющуюся (без промежутков) часть называют периодом. Минимальную...

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

Рекурсивная функция для вычисления N числа Фибоначчи.
Описать рекурсивную функцию FibRec(N) целого типа, вычисляющую N-е число Фибоначчи F(N) по формуле: F(1) = F(2) = 1, F(k) = F(k–2) + F(k–1), k = 3, 4, ... . С помощью этой функции найти пять чисел...

Готовые задания на Pascal
Выкладываю готовые задачи на Pascal. Может кому-то понадобятся. 1. Вычисление функции U=f(x,y,z) при заданых значениях x,y,z. 2. Табулирование функции y=f(x) для аргумента, что меняется на...

Четырехзначный палиндром
Требуется написать программу, определяющую, является ли четырехзначное натуральное число N палиндромом, т.е. числом, которое одинаково читается слева направо и справа налево. Входной файл INPUT.TXT...

Дано натуральное число n. Вычислить S=1!+2!+3!+4!+.+n! (n>1)
Не знаю как сделать, чтобы при введения числа меньше 1 (n<1), программа писала бы ('число должно n>1') и просила бы ввести новое число. Помогите пожалуйста. :( program Zadacha; var i, n, p, S:...

Найти максимальный элемент главной диагонали матрицы
найти максимальный элемент главной диагонали матрицы:) Где ошибка?) program fd; uses crt; var a:array of integer; max:arrayof integer; i,j,m,n,l,k:integer; f:string; begin ...

Записи (структуры) в паскале
Здравствуйте ;) Не могу справиться с решением тривиальной проблемы :( Есть программа которая выводит ведомость студентов (работает всё как нало)(код мой): Program Lab14_10; uses CRT; const...

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

На счёт в банке положили N денег под M процентов годовых. Какая сумма будет храниться на счету через x лет?
на счёт в банке положили N денег под M процентов годовых. кокая сумма будет храниться на счкту через x лет

Найти корни уравнения методом Ньютона
Помогите пожалуйста составить структурированную программу для нахождения корня уравнения 3x-4ln(x)-5 = 0 на отрезке с абсолютной прогрешностью E = 10(в минус третьей степени) Методом Ньютона. В...

Последовательность чисел а0, а1, а2, … образуется по закону: а0=1; аk=kak-1+1/k (k=1,2,…). Дано натуральное число n. Получить а1, а2, …, аn.
Последовательность чисел а0, а1, а2, … образуется по закону: а0=1; аk=kak-1+1/k (k=1,2,…). Дано натуральное число n. Получить а1, а2, …, аn.

Макс и мин значения в двумерном массиве.
Дан массив 10*15. Надо найти максимальное и минимальное значение каждого столбца и строки. Помогите,пожалуйста.Очень срочно!

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

Опишите алгоритм подсчёта числа элементов, равных максимальному, в числовом массиве из 30 элементов
Опишите алгоритм подсчёта числа элементов, равных максимальному, в числовом массиве из 30 элементов. Решите плз заранее благодарю

Програма для решения задания: a+b/c+c/ab
Я создал программу на паскале, но у меня что-то не сходится. Можете исправить? Program Z1; Var a, b, c, d, e, t, r:integer; begin writeln('Введите переменную a'); readln(a); writeln('Введите...

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

Найти количество трехзначных чисел, сумма цифр которых равна А, а само число заканчивается цифрой В (А и В вводятся с клавиатуры)
Найти количество трехзначных чисел, сумма цифр которых равна А, а само число заканчивается цифрой В (А и В вводятся с клавиатуры).

Функция byte
Подскажите пожалуйста! Что возвращает функция byte( ), аргумент которой - строковая переменная? Точнее: byte(s), где Var s: string; s - это понятно - i-й символ строки s. Что...

Решение СЛУ с выбором главного элемента по столбцу (Python -> Pascal)
мне нужно как то конвертировать в паскаль этот код, пыталась выводит много ошибок. :wall::gsorry: задание: решить слу с выбором главного элемента по столбцу, Вычислить вектор невязки , ...

Найти наименьшее число из трех заданных
нужно написать 2 программки в паскалеАВС: 1задача : даны три числа. найти наименьшее из них. 2задача: дано трёхзначное число. в нём зачеркнули первую справа цифру и приписали её слева. вывести...

Вывести матрицу
Здраствуйте всех с новым годо помогите найти ошыбку прога должна вывадить ответ матрицай но не выводит var a:array of integer b:arrayof integer; n,i,j:integer begin writeln('введите размер...

Определить и вывести на печать номер квадранта, в котором расположена точка
определить и вывести на печать номер квадранта, в котором расположена точка М(х,у)

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

Дана последовательность чисел a1, a2,…, an. Указать наименьшую длину числовой оси, содержащую все эти числа.
Дана последовательность чисел a1, a2,…, an. Указать наименьшую длину числовой оси, содержащую все эти числа. Помогите пожалуйста!!! Очень надо!

Задачи с входными и выходными файлами
Люди! Решите как можно скорее и желательно все! Очень прошу! Заранее благодарен. 1) На плоскости задано десять точек. Найдите квадрат максимальной площади с вершинами в заданных точках....

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

Для данного х вычислить значение функций
для данного х вычислить значение функций Срочно!

Кратность
Дано 4 числа.Определить сумму тех из них которые кратны 3 Пожалуста помогите!!!!!!!!!!! Добавлено через 40 минут ну кто нибудь помогите!!!

Ветвление. Если сумма трех попарно различных действительных чисел x, y, z меньше 1, то наименьшее из этих трех чисел заменить полусуммой двух других
Если сумма трех попарно различных действительных чисел x, y, z меньше 1, то наименьшее из этих трех чисел заменить полусуммой двух других; в противном случае заменить меньшее из x и y полусуммой двух...

Рекурсия, возведение в степень.
мне надо написать 3 задачи. Возведение числа в степень используя а) цикл б) рекурсивную функцию в) рекурсивную процедуру Я понимаю что задачи для кого-то покажутся очень лёгкими, но я их написать...

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

Удалить строку матрицы
Дана матрица размера M х N и целое число K (1 <= K <= M). Удалить строку матрицы с номером K. Помогите с задачей, она идёт, удаляет нужную строку, но и последний столбец, что нужно здесь...

Расширенный алгоритм Евклида
Не могу найти решение на Паскале задачи на расширенный алгоритм Евклида: Для целых m и n, в процессе нахождения d=НОД(m,n) с помощью алгоритма Евклида, определить минимальные x и y, целые, такие,...

Даны два числа a и b. проверить, имеют ли они одинаковый знак (+ или- )
помогите написать действия для паскаля) Даны два числа a и b. проверить, имеют ли они одинаковый знак (+ или- ) Добавлено через 7 минут var a,b:integer; begin write('Первое число: '); ...

Что можно писать на Паскале?
Кроме решения школьных уравнений, какую-то программу можно писать на Турбо Паскале? Или может в Object Pascal?

Перевод десятичного числа в двоичное
Составить программу перевода десятичного числа в двоичное

Даны натуральные числа n, m. Получить сумму m последних цифр числа n.
Даны натуральные числа n, m. Получить сумму m последних цифр числа n. Люди дайте пожалуйста, блок-схему. выручите пложалуйста.

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

Определите значение целочисленных переменных x и y после выполнения фрагмента программы
6) Определите значение целочисленных переменных x и y после выполнения фрагмента программы: x := 336 У := 8; x := x div y; y := х mod у; 1) x = 42, y = 2 2) x = 36, y = 12 3) x = 2, y = 24 4) x...

Найти цифровой корень заданного натурального числа
1)Данны целые числа m, n(0<m<=12, 0<=n<60), Указывается момент времени: m часов, n минут.Определить наименьшее время(число полных минут), которое должно пройти до того момент, когда часовая и...

Определить, является ли число факториалом некоторого числа N
Вводится натуральное число. Определить, является ли оно факториалом некоторого числа N, и если является, то найти это число N.

Больше-меньше
Одна из основных операций с числами – их сравнение. Мы подозреваем, что вы в совершенстве владеете этой операцией и можете сравнивать любые числа, в том числе и целые. В данной задаче необходимо...

НОК алгоритм Евклида
Определить НОК (наименьшее общее кратное) двух чисел, используя алгоритм Евклида для вычисления НОД Напоминалка: Пусть m и n одновременно не равные нулю целые неотрицательные числа и пусть m>=n....

Бесконечность
РЕбят помогите. Мне нужно ограничить модуль до бесконечности. (abs(x)< "тут нада както прописать бесконечность" Я понимаю что это и так любое число, но учитель сказал задать. ЗАранее спасибо

Пересчёт веса из фунтов в килограммы
Program ves; var vesF,vesG:real;//вес в фунтах и граммах begin writeln('Пересчёт веса из фунтов в килограммы.'); writeln('Введите вес в фунтах и нажмите <Enter>.'); write('->',' ');...

Как переместить курсор в файле в читаемом файле на начало?
Добрый день. Выполнил цикл "while not eof(inputFile)". Теперь надо выполнить еще раз цикл с таким же условием, но другим содержимым. Я проверил, второй цикл ни разу не выполняется. Я так понял, что...

Считать текст из файла Input.txt и вывести в файл Output.txt все предложения в обратном порядке
написать программу, которая считывает текст из файла Input.txt и выводит в файл Output.txt все предложения в обратном порядке. Добавлено через 2 часа 12 минут 0 секунд эта прога мой экзамен......

Описать функцию Sign(X) целого типа, возвращающую для вещественного числа заданные значения
Описать функцию Sign(X) целого типа, возвращающую для вещественного числа X следующие значения: –1, если X < 0; 0, если X = 0; 1, если X > 0. С помощью этой функции найти...

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

Вывести одно число наибольшую сумму двух результатов измерений, выполненных с интервалом
На вход программы подаются результаты измерений, выполняемых прибором с интервалом 1 минуту. Все данные – целые числа (возможно, отрицательные). Требуется найти наибольшую сумму двух результатов...

Напишите логическую функцию определяющую является ли число n гиперпростым
Простое число называется гиперпростым если любое число получающееся из него путем отбрасывания двух последних цифр, тоже является простым. Например, число 733-гиперпростое, т.к. 73 и 7-простые....

Составить алгоритм и программу нахождения суммы ряда с заданной точностью Е
проблемы с паскалем((( Уже не знаю что делать, куда бежать! Помогите пожалуйста програмку написать. Очень срочно!!!! Задача: составить алгоритм и программу нахождения суммы ряда с заданной точностью...

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

Какой путь прошел пешеход
1 задача. Реализуйте программу на языке Pascal для реализации следующего алгоритма: Пешеход шел по пересеченной местности. Его скорость движения по равнине v1 км/ч, в гору — v2 км/ч и под гору — v3...

Найти сумму квадратов четных чисел
Program qrt; Uses crt; Var n,i,k,s:integer; Begin Writeln('Введите n'); Readln(n); clrscr; s:=0; for i:=1 to n do

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

Табулирование функции sin^2x
Здравствуйте! Помогите, пожалуйста, решить задачу: Составить программу для вычисления значений функции F(х) на отрезке с шагом h. Результат представить в виде таблицы, первый столбец которой —...

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

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

Работа с аргументами командной строки
Использую fpc в линуксе . Никак не получается разобраться как же правильно использовать paramcount и paramstr() . буду очень благодарен , если кто-то наконец объяснит(куском программы)) Добавлено...

Чтение чисел из текстового файла
После таво как созда файл и вогнал туда даные(цыфры) мне нада их прочитать и проверить какие они (< или > 0)... Напишыте плиз кусок програмы где показано как читать даные с файла!

Количество символов, слов, строк в файле
Дан текстовый файл. Провести его анализ – определить и вывести следующие данные: количество символов, количество строк и количество слов. Для подсчета слов использовать функцию получающую строку и...

Найти максимальное значение матрицы и индексы всех элементов, равных ему
В целочисленной матрице размером 10x10 найдите максимальное значение и индексы всех элементов, равных ему.

Начав тренировки лыжник пробегал 10 км, каждый следующий день он увеличивал длину пробега на 10% от предыдущего дня
Начав тренировки лыжник пробегал 10 км, каждый следующий день он увеличивал длину пробега на 10% и от предыдущего дня. Определить, в какой день он пробежит более 20 км, в какой день суммарный пробег...

Проверка числа на простоту
Здравствуйте,задача вроде решена,но не на все 100%,иногда выдает неправильный ответ: Условия Дано натуральное число n1. Проверьте, является ли оно простым. Программа должна вывести слово YES,...

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

Ошибка: Ожидался порядковый тип
Program1.pas(6) : Ожидался порядковый тип program name; var y,x,k : real; begin var a:=1.45; for x:=1 to x<=1.8 do if (a<=x) then begin for k:=1 to k<10 do

Определите сколько раз будет выполняться тело цикла
Определите сколько раз будет выполняться тело цикла: 1)S:=0; I:=0; Repeat I:=I-1; S:=S+1/I; Until I<=1; 2) S:=0; I:=1; Repeat I:=I+1

Описать процедуру Minmax(x,y) записывающую в переменную Х минимальное из значений Х и Y, а в переменную Y – максимальное из этих значений.
Описать процедуру Minmax(x,y) записывающую в переменную Х минимальное из значений Х и Y, а в переменную Y – максимальное из этих значений (X и Y- вещественные параметры, являющиеся одновременно...

Составить программу ввода значений и вычисления длины этого вектора
Дан вектор {z1},i=1,...,50. Составить программу ввода значений и вычисления длины этого вектора по формуле L=корень из z12+z22+...+z502

Вывести n-е число Фибоначчи
Добрый день. Не понимаю как решить задачу прошу вас помочь. Числа Фибоначчи определяются следующими формулами: f(0)=f(1)=1;f(n)=f(n–1)+f(n–2) , при n<2. Входные данные На вход программе...

Данное четырехзначное число записать наоборот
Данное четырехзначное число записать наоборот.Пример-6584-4856 Заранее спасибо!

Используя циклы вывести на экран таблицу умножения на 4
Помогите решить задачу на Паскаль для 9 класса:Используя циклы вывести на экран таблицу умножения на 4

Напечатать все числа Пифагора, меньше N
Всем привет! Сабж: "Натуральные числа abc называются числами Пифагора, если выполняется условие теоремы Пифагора. Задача: Напечатать все числа Пифагора, меньше N"

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

Как написать двойное условие
Как в Pascal-е написать двойное условие вида: if(что-то тру) и (что-то тоже тру) writeln("yes"); всегда писал на С, там это делается вот так: if(a==0 | b==0) { ....

Решение СЛАУ методом Гаусса
Решить задание методом Гауса и сложить, и наладить програму на языке Pascal которая реализует введение выходных данных, вычисление заданной системы уравнений методом Гаусса. P.S. идет три примера...

Составьте блок-схему и программу для нахождения суммы
Составьте блок-схему и программу для нахождения суммы. {по следующей формуле значение a вводится с клавиатуры} N= \sum_{x=5}^{100} \frac {ax-1}{2x^2+3}

Найти тройки натуральных чисел из интервала от 1 до 20, для которых выполняется равенство: x2+y2=z2.
Найти все такие тройки натуральных чисел x,y,z из интервала от 1 до 20, для которых выполняется равенство: x2+y2=z2. не могу разобраться обьясните

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

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

вывести сторку из звездочек...
Здравствуйте.....Что то не выходит задачка.... Написать процедуру, котороя выводит на экран строку, состоящую из звездочек. Длина строки (количество звездочек) является параметром функции.

Пустой символ в типе данных char
Как обозначить пустой символ ? т.е. если к примеру пользователя просят ввести 3 переменные типа char (a,b,c) а он вводит только 2е (a,b) как выявить переменную (c) для запуска условного оператора...

Массив констант.
Объясните как создать массив констант элементы которого последовательность символов, к примеру a чтобы был "creatin" и т.д.

Найти сумму элементов, расположенных выше главной диагонали
1. Дан массив из n целых чисел. Найти сумму всех элементов, заключенных между m и n, где m и n вводятся с клавиатуры. 2. . Ввести массив из 20 целых чисел. Вывести на экран количество всех простых...

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

Произведение всех натуральных чисел от 1 до 100
Найти произведение всех натуральных чисел от 1 до 100 Найти произведение четных чисел от 1 до 100 Решите пожалуйста

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

Блок-схема для сортировки методом пузырька
Задача: массив из 20 элементов заполняется случайными целыми числами в диапазоне от0 до 100 и выводит на экран в строку. Массив сортируется пузырьковым способом. Текст программы на языке Паскаль:...

Проверить, будут ли все цифры числа различными
Дано натуральное число n. Проверить, будут ли все цифры числа различными.

Подсчитать количество вхождений подстроки в строке
Вот функция function CntRecurrences(substr, str: string): integer; var cnt, p: integer; begin cnt := 0; while str <> '' do begin p := Pos(substr, str); if p > 0 then

Нарисовать ракету.
Помогите пожалуйста нарисовать ракету

Табулирование функции
Господа, помогите! Розробити програму табулювання функції, вивести їх значення на екран. Розробити три варіанти обчислення з використанням трьох видів циклів, для контролю підрахувати суму...

Вычисление суммы ряда
Доброго времени суток! Помогите пожалуйста сделать следующую задачку на Pascal: y=sin x-квадрат+sin x-куб+..+sin x степени n Заранее спасибо!

Составить программу табулирования функции
Всем привет помогите пожалуйста на паскале составить программу табулирования функции y=1/x+sin(x) на отрезке с шагом 1.

Крестики-нолики
Нужно реализовать в Pascal. Что бы были входные(1.in) и выходные(1.out) данные. ) создать .ехе файл Крестики-нолики Условие задачи: Игра в крестики-нолики ведётся на квадратном поле 3х3....

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

Как проверить принадлежит ли число массиву?
Дан массив (integer), вводится число и необходимо узнать, есть ли оно в массиве.

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

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

Составить программу поиска трехзначных чисел которые при делении на 47 дают в остатке 43
Составить программу поиска трехзначных чисел которые при делении на 47 дают в остатке 43!! зарание спасибо!!=)

Операция неприменима к операндам этого типа (k:real; k:=d mod 1)
Program abcdbc; var N,M,g:integer; f,d,c,k:real; begin Writeln('bla'); Readln(N); c:=N*3; Writeln('bla'); Writeln('bla'); Readln(M);

Проверка вводимых данных
Доброго времени суток, уважаемые форумчане. Прошу помощи, разобраться со следующим моментом. Имеется часть кода: repeat clrscr; {$I-} write('Введите значение x '); readln(x); err:=ioresult;...

Реализация нейросети и обучение методом обратного распространения ошибок
Здравствуйте. Очень нужна помощь. Есть хорошая статья с примерами кода для реализации нейросети в паскаль. http://www.gotai.net/documents/doc-nn-009-05.aspx...

10 чисел расположить в порядке возрастания
Нужно составить задачу, чтобы в итоге 10 чисел располагались в порядке возрастания!

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

Теорема Пифагора в Паскале
Напишите программу которая вычисляет теорему пифагора при вводе сторон ab,bc,ac под корнем выражение (ab) в квадрате умножить на bc,трех фигур.через For For i:=1 to 3 do

Написать программу, которая выводит 5 раз привет
Доброго времени суток уважаемые форумчане. Обращаюсь к вам с просьбой помочь составить 3 программы. Не давно начал изучать програмирование, перешли на Pascal, но из-за болезни, прошляпил 2 недели....

Сортировка заданного массива методом быстрой сортировки
Помогите пожалуйста разработать программу, выполняющую сортировку заданного массива методом быстрой сортировки. Тип элементов-целочисленный, кол-во 19, упорядочить по убыванию. Спасибо

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

Вводится последовательность
Вводится последовательность натуральных чисел. Признак конца ввода – ноль. Необходимо проанализировать подпоследовательности из подряд идущих чисел «29» и вывести количество...

Вычислить значение логического выражения при следующих значениях логических величин
3.10. Вычислить значение логического выражения при следующих значениях логических величин А, В и С: А=Ложь; В=Ложь; С=Истина: а) (не А или не В) и не С; б) (не А или не В) и (А или В); в)...

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

Найти сумму элементов побочной диагонали квадратной вещественной матрицы
1. Напишите программу, которая вводит с клавиатуры строку и подсчитывает количество символов в последнем слове (слова – группы символов, разделенные пробелами). 2. Найти сумму элементов побочной...

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

Даны радиус круга и сторона квадрата. Проверьте, пройдет ли квадрат в круг?
Помогите пожалуйста решить эту задачу) Я видел похожую задачу в этом форуме, но препод сказал, что не правильно. надо по диаметру судить, а не по площади(именно в моей задачи)!

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

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

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

Readln не работает
Добрый день. Я составляю программу для упорядочивания массива чисел(задание такое в универе, 1 курс). В конце, после вывода нового упорядочного массива пишу readln, для того, чтобы экран закрывался...

Является целое число, введенное пользователем простым.
Помогите решить,плиз!!!(((( 1.Написать программу, которая проверяет, является целое число, введенное пользователем простым. (Простым называется число, которое не имеет делителей кроме 1 и самого...

Поменять местами слова в строке
Помогите пожалуйста с задачкой, на вид не сложная, но со строками я не очень дружу. Дана строка, например "Имя Фамилия", нужно поменять местами слова в строке.

Подсчитать количество слов в заданном файле
Помогите пожалуйста решить 2 задачки: 1. В тестовом файле записано N строк. Группы символов, разделенные пробелами и не содержащие пробелов внутри себя, будем называть словами. Подсчитать...

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

Что делает функция Odd?
что оно делает это odd? Пример: if odd(n) then write(a);

Есть ли в Паскале функция "Clear screen"?
САлам ЛОКИ и ЦЕРБЕР ! ПОмагите чайнику ... есть ли в Паскале функция "Clear screen " , если да то можно вкратце ее использование ! Мне в проге надо в определенное время стирать с экрана МАТРИЦУ , и...

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

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

Присвоение переменной значения (string)
Мне надо найти и вывести из файла определенные строки. Содержимое файла такое: 03.2009 123245 04.2009 3243566 Суть такая: пользователь вводит значение (для начало найти одно совподение,...

Определить, является ли оно степенью числа 2
Здравствуйте! Нужна помощь в решении задач. Помогите, пожалуйста. 1. Треугольник задан координатами своих вершин. Проверить истинность высказывания: «треугольник равнобедренный» 2. Даны 2...

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

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

Напечатать k-ю цифру последовательности, в которой выписаны подряд квадраты всех натуральных чисел
Дано натуральное k.Напечатать k-ю цифру последовательности 149162536, в которой выписаны подряд квадраты всех натуральных чисел. не через массив

Анимация падающего снега
Помогите на pascal сделать анимацию падающего снега. Z кругов, расположенных на выбранной случайным образом высоте. Круги перемещаются вниз и на нижней границе экрана исчезают, мместо них появляется...

Программа 'Факториал'
Суть заключается в том чтобы программа вычисляла и сразу же выводила на экран значение формулы y=n! . Значения переменных должны быть Double.

Как объявить пустой массив?
Привет,народ,помогите,кто что знает..вот задача такая стоит из массива x переписать положительные элементы в массив y, а отрицательные в массив z. Я заступорилась на том как объявить массив z и y....

Поменять порядок цифр числа n на обратный
вести число n.Поменять порядок цифр числа n на обратный.

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

2)Напечатать таблицу перевода расстояний в дюймах в сантиметры для значений 10,11,.,22 дюйма(1дюйм-25,4мм)
:) Напечатать таблицу перевода расстояний в дюймах в сантиметры для значений 10,11,...,22 дюйма(1дюйм-25,4мм)

Создание базы данных
Для отладки программы необходимо предварительно создать на магнитном диске соответствующий тестовый набор исходных данных для выполнения задачи (файл из 10-20 записей). Все перечисленные сведения, их...

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

Расположить числа в порядке возрастания
Дано три числа x,y,z. Числа целые, отличные друг от друга. После обработки данных числа должны быть расположены в порядке возрастания.

Поиск символа в строке. Как осуществить поиск в обратном направлении
Всем доброго времени суток. Вопрос такой: как осуществить поиск в обратном направлении, т.е. я в строке (a(bc)) нахожу первую закрытую скобку (которая после с) и мне надо найти последнюю открытую...

Подсчитать количество различных (значащих) цифр в десятичной записи натурального числа
Помогите решить задачу!!! Плиз! Подсчитать количество различных (значащих) цифр в десятичной записи натурального числа n и напечатать в возрастающем порядке все цифры, не входящие в десятичную...

Лабиринт в паскале
Как написать программу лабиринт, лабиринт-массив nxm, состоящий из 0 и 1, ширина m и длина n лабиринта вводится с клавиатуры. Нигде на форуме не могу найти ответа.

Заменить все элементы главной диагонали матрицы на нули
Дан массив целых чисел размером 4x4. Заменить все элементы главной диагонали на нули. Вывести на экран монитора содержимое массива до обработки и после обработки.

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

Программа, для нахождения наименьшего из введенных пользователем чисел
Всем привет! Надо написать программу на Pascal'е. Это школьное Д/З. Недавно начали изучать Pascal. Задача: программа должна найти наименьшее число из тех чисел, которые ввел пользователь...

Примеры задач на условие и цикл.
Напишите пожалуйста 2-е любые простые задачи 1-ую с условием а 2-ую с циклом! очень надо! (конечно если вам не трудно то можно ещё попросить и блок схемы!=)) Заранее спасибо огромное!

Вычислить величину силы тока на участке электрической цепи сопротивлением R Ом при напряжении U В
Составьте программу для вычисления величины силы тока на участке электрической цепи сопротивлением R Ом при напряжении U В. Необходимо написать • Алгоритм программы; • Исходный код (текст...

Нахождение наибольшего общего делителя
1.набрать и отладить программу нахождения наибольшего общего делителя и протестировать её на следующих исходных данных: a) a=40 b=64 б) a=32 b=16 в) a=12 b=20 г) a=5 b=12 2.cоставить...

Чтение массива из файла
Есть текстовый файл. Выглядит он вот так: 5 3 3 4 5 7 1 2 3 8 9 Нужно прочитать массив из 3 строки. Из 2-ой у меня получается: assign(input,'./input.txt'); assign(output,'./output.txt'); ...

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

Определить какое наибольшее число подряд идущих купе полностью свободны
В плацкартном вагоне 54 места, пронумерованных числами от 1 до 54. Вагон разбит на 9 купе. Первые 36 мест расположены по левую сторону от прохода, места 1–4 находятся в первом купе, места 5–8 – во...

Найти среднее значение элементов массива
парни задали ДЗ помогите мне( всего 4 задачки ( 1 - найти среднее значение элементов массива размером n. Заменить данній массив, отнимаючи от каждого элемента среднее значение 2- В массиве A...

Сортировка выбором
Сортируем массив так:найти мин элемент,который копируем в первую ячейку другого массива,и снова находим мин в первом массиве и во вторую ячейку второго и так далее,по идее это сортировка...

Двойное условие в цикле while
Как только одно из условий становится true цикл прекращается. Как пофиксить? const M = 3; N = 3; var a: array of integer; b: array of integer;

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

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

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

Метод простых итераций
Помогите плиз!!!!!!! Очень надо! Если запускать программку, то пишет Введите Е и далее ничего не происходит, но при этом если ставить определенные х1 и х2 и убрать условие проверки, то все работает...

Определить сколько чётных цифр в числе
Здравствуйте! Помогите с задачей. Дано целое число, определить сколько в нём чётных цифр. Спасибо!

Написать программу которая выведет на экран все буквы латинствого алфавита с кодом ASCII и частотой появления
Дан текстовый файл состоящий из нескольких строк(колличество строк на задаётся) ( файл заполняется с клавиатуры) написать программу которая выведет на экран все буквы латинствого алфавита с кодом...

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

Напишите процедуры ввода и вывода элементов матрицы
Напишите процедуры ввода и вывода элементов матрицы T размерностью MxN.

Формат вывода вещественного числа
народ помогите как сделать так чтобы ответ выводился с точностью 0,00001 Program G; var k,a,b,c,f,d,s:real; begin writeln('vvod k,a,b :'); readln(k,a,b); c:=-(a+b); d:=(k*sin(b))/sin(c);...

По введенному числу от 1 до 12 (номеру месяца) выдать все приходящиеся на этот месяц праздничные дни
Которое по введенному числу от 1 до 12 (номеру месяца) выдает все приходящиеся на этот месяц праздничные дни ( например, если введено число 1, то должно получиться: 1-е января - новый год, 7-е января...

Вывести строку, содержащую символы строки S, между которыми вставле-но по одному пробелу
Я даже понятия не имею ка его решить! можете написать программу , заранее спасибо.:cry: вот задачка: Дана непустая строка S. Вывести строку, содержащую символы строки S, между которыми вставле-но...

Сначала суток прошло n секунд, определить: сколько полных часов прошло с начала суток, сколько полных минут прошло с начала текущего часа, сколько пол
помогите решить Сначала суток прошло n секунд, определить: сколько полных часов прошло с начала суток, сколько полных минут прошло с начала текущего часа, сколько полных секунд прошло сначала...

По номеру месяца вывести его название
За номером месяца вывести его название

Нахождение минимального числа
Составить алгоритм нахождения min(a,b,c). Воспользоваться алгоритмом-процедурой нахождения min из 2-х чисел. Использовать при решении можно любые процедуры/функции/алгоритмы, главное - оформить в...

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

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

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

Траектория снаряда.
Очень прошу помочь) -завтра сдавать лабу, думал сам сделать смогу, а оказалось не втыкаю эту задачу.Заранее большое спасибо!!! траектория снаряда, вылетающего из орудия под углом альфа с начальной...

Записать формулы на языке Pascal
Помогите записать формулы на языке Pascal 1+3x^2+...+\frac{2n+1}{n!}x^{2n}\ \ \ \ \ \left(1+2x^2 \right)e^{x^2}

Вывести все четные числа начиная с числа N и до числа M
помогите кто чем может: while вывести все четные числа начиная с числа N и до числа M. числа задает пользователь.

Построение блок-схем
Помогите пожалуйста составить блок-схему к программе. Program bd; Uses CRT; type Svedeniya=Record FIO:string; Data:String; Machi,Peredachi,NARUSH,Matchi:string;

Слово-перевертыш
Составить программу определяющую является ли введенное слово,словом-перевертышем

Вычислить площадь прямоугольника, используя формулу Герона для вычисления площади треугольника
помогите ПОЖАЛУЙСТА!!!!!!!!!!!! ФУНКЦИИ; 1,Даны длины сторон прямоугольника а и в и длина диагонали d.Составить программу,вычесления площади прямоугольника ,используя формулу ГЕРОНА для вычисления...

Найти сумму N первых чисел фибоначчи
Найти сумму N первых чисел фибоначчи через цикл for program zd421; var i,n,s,f,f1,f2:integer; begin s:=0;f1:=1;f2:=1 for i:=1 to n do begin

Дано действительное число x
Ребята помогите пожалуйста надо вычислить: Дано действительное число x Вычислить x-x^3/3!+x^5/5!-x^7/7!+x^9/9!-x^11/11!+x^(2n-1)-(2n-1)! вот как то так знак ^-типа x в какой то степени

Не могу установить программу Pascal
Сначала начала скачивать с Интернета программу Pascal. При установке перед запуском программы высвечивается Троян. Закрыла. Потом скинула у друга программу. То же самое – все установилось, но опять...

Подсчитать количество цифр в данном числе
Дано натуральное число N.Подсчитать количество цифр данного числа

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

Найти сумму отрицательных и произведение положительных элементов массива
Найти сумму отрицательных и произведение положительных элементов массива.

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

Двузначное число
Дано двузначное число. Вывести «да», если цифры числа одинаковы и «нет», если цифры разные.

Массив содержит четное количество элементов, которая сортирует первую половину массива по возрастанию
Массив содержит четное количество элементов, которая сортирует первую половину массива по возрастанию помогите кто знает как это сделать!!!

Замена символов в строке
Есть массив из символов -строка и еще 2 мерный массив где записаны пары символов какой заменить на какой. Также дана длина строки, количество пар для замены и сколько раз надо поменять. Надо заменить...

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

Ряд с точностью Eps
Найти сумму ряда с точностью EPS=0.001, общий член которого A(n)=(2*n-1)/2^n

Сортировка массива по возрастанию
произвести сортировку заданного целочисленного массива Anm по возрастанию

Заполнить массив так, чтобы значения были квадратами индексов
Заполнить массив так, чтобы значения были квадратами индексов

Главная диагональ
Подскажите пожалуйста как осортировать двумерный массив, на галвной диоганали... Очень буду признателен!!!!!!!

Создать массив из 30 случайных целых чисел в диапазоне от 1 до 50 и вывести его
Создать массив из 30 случайных целых чисел в диапазоне от 1 до 50 и вывести его. Затем создать типизированный файл, записать в него числа массива из массива, удовлетворяющие заданному условию, и...

В 4-х значном числе поменять цифры местами
Составить программу которая в 4-х значном числе меняет местами 1 и 2 цифры,3 и 4. Пример:1234=2143

Найдите все числа, принадлежащие заданному отрезку, у которых ровно пять различных нечётных делителей
Здравствуйте,помогите написать программу на паскале(Abc или abc.net) с таким условием. Задание на массивы. Найдите все натуральные числа, принадлежащие отрезку ,у которых ровно пять различных...

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

Введенное число делится без остатка на 3?
Друзья помогите пожалуйста с задачой: Написать программу проверяющую, верно ли утверждение что введенное число делится без остатка на 3. Плииииз

Произведение элементов массива
помогите пожалуста! найти произведение положительных элементов массива, состоящего из 10 элементов, введенных с клавиатуры . P.S. Паскаль обычный

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

Как копировать и перемещать файлы
Доброго времени суток всем! Подскажите, как реализовать вот такую муть:чтобы при запуске программы указанный в ней файл перемещался или копировался в другое место\папку, например из...

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

Образуют ли 3 точки треугольник
Ввести числа x1,y1,x2,y2,x3,y3 которые являются значениями координат трех точек на "плоскости." Определить, образуют ли они треугольник (точки не лежат на одной прямой), если образуют, то определить,...

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

Посчитать процент
Народ, помогите пожалуйста составить программу задачи: "Посчитать, какой процент составляет количество символов а, от количества символов б" Добавлено через 9 минут Да и можно объяснить словами,...

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

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

Напишите программу, которая заполняет массив квадратами натуральных чисел от 1 до N
Напишите программу, которая заполняет массив квадратами натуральных чисел от 1 до N . Входные данные Входная строка содержит размер массива N . Гарантируется, что 0 < N ≤ 10000...

Вводится число. Определить, является ли оно степенью двойки.
Вводится число. Определить, является ли оно степенью двойки. P.S. Сойдёт и консольный вариант! Я уж как нибудь "пере-оформлю" в визуальный вариант! 8)

Даны натуральные числа n, k. Проверить, есть ли в записи числа nk цифра m.
Даны натуральные числа n, k. Проверить, есть ли в записи числа nk цифра m.

Дано вещественное число - цена 1 кг конфет. Вывести стоимость 0.1,0.2, .1 кг конфет
дано вещественное число-цена 1кг конфет. вывести стоимость 0.1,0.2, ...1кг конфет.

Определить 10-е число Фибоначчи
Числа Фибоначчи определяются формулами: f1=1;f2=1;fn=fn-1+fn-2 для n=3,4.... a.Определить 10-е число фибоначчи. b.Найти вервое число фибоначчи меньшее заданнного m (m>1) с. Проверить верно ли что...

Найти все простые числа от 1 до 100
паскаль. найти все простые числа от 1 до 100...

Бинарное дерево на Паскале.
Помогите пожалуйста реализовать дерево ____A __B___C ______D ____E___F __G_H__L_K 1) посредством массивов; 2) списков сыновей; 3) левых сыновей и правых братьев; 4) левых и правых сыновей.

Вычислить сумму ряда с заданной степенью точности
Вычислить сумму ряда с заданной степенью точности : \sum_{n=0}^{\infty}\:\frac{\cos \pi n}{\left(n^3+1 \right)^2}\;,\;\alpha=0.001 + ещё нужна Блок-схема.

Блок-схема, как отобразить процедуру?
Добрый вечер. Назрел такой вопрос: как в блок-схеме отобразить процедуру? И нужно ли ее там вообще писать? Если да, то как будет выглядеть ее блок? Заранее спасибо.

Подскажите как написать программу про округления числа
надо округление таких чисел к примеру ( 24.47, 54.65 ... и т.д) кто откликнется я объясню получше, прошу побыстей.

Дана строка символов, удалить из неё все знаки препинания
uses crt; var s:string; i:integer; const z:string='.,;:!?()'; begin clrscr; writeln('введите строку'); readln(s); for i:=1 to length(z) do while pos(z,s)<>0 do delete (s,pos(z),1); ...

Вывести цифры числа в прямом порядке
Вводится натуральное число в десятичной системе счисления. Вывести все его цифры в прямом порядке. Оператор цикла с параметром не использовать! (while или repeat/until)

Определить кратно ли введенное число числу 5?
Уважаемые кодеры помогите решить задачку по паскалю: 2) определить кратно ли введенное число числу 5?

Найти сумму n первых членов арифметической прогрессии
1. Найти сумму n первых членов арифметической прогрессии (Sn), если вводится первый элемент , разность прогрессии d и количество слагаемых n. 2. Услуги телефонной сети оплачиваются по следующему...

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

Дан радиус окружности. Найти ее диаметр.
Помогите решить простые задачи мозги кипят: 2-я. Дан радиус окружности. Найти ее диаметр.

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

Составить блок-схему и программу вычисления значений функций
Составить блок-схему и программу вычисления значений функций f(x) на отрезке в точках x:=x+h , где h - шаг цикла, с последующим выводом таблицы значений. f(x)=lnx+1, xЄ, h=0,5

По заданному числу n от 1 до 365 определите, на какое число какого месяца приходится день невисокосного года с
В чем моя ошибка? Free Pascal По заданному числу n от 1 до 365 определите, на какое число какого месяца приходится день невисокосного года с номером n. Входные данные Дано одно целое число n. ...

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

Поменять местами дробную и целую части числа и вывести полученное значение числа.
19. Дано действительное число R вида nnn. ddd (три цифровых разряда в дробной и целой частях). Поменять местами дробную и целую части числа и вывести полученное значение числа. Помогите...

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

Гиперболический синус SH(x), разложение в ряд
Всем здравствуйте мне очень нужно помочь решить задачу на паскале, пожалуйста: известно, что гиперболический синус SH(x) может быть представлен рядом:...

Определить число полных часов и полных минут, прошедших с начала суток.
21. С начала суток часовая стрелка повернулась на y градусов (0 ≤ y <360, y — вещественное число). Определить число полных часов и полных минут, прошедших с начала суток. Сформулировать и решить...

58. Дано действительное число a. Для функций f(x), графики которых представлены на рис. 1б вычислить f(a)

К какому виду алгоритмов можно отнести алгоритм, представленный на схеме?
К какому виду алгоритмов можно отнести алгоритм, представленный на схеме?

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

Составить программу сортировки по возрастанию значений трех переменных:A,B,C.
Составить программу сортировки по возрастанию значений трех переменных:A,B,C.

количество элементов в множестве А типа М
Написать программу, подсчитывающую количество элементов в множестве А типа М. Например, для множества должно быть выведено 3.

Перевести код из Python в Pascal
def f(x, y): if a == '.': a = 1 return 1 + f(x-1, y) + f(x+1, y) + f(x, y-1) + f(x, y+1) return 0 n, m = map(int, input().split()) max_s = -1 a = for i in range(m):

Две программы на for/while
Не могу решить две задачи: 1)В деревне Интернетовка все дома расположены вдоль одной улицы по одну сторону от нее. По другую сторону от этой улицы пока ничего нет, но скоро все будет – школы,...

Дано натуральное число N. Вычислить: (1/sin1)*(1/sin1+sin2)*.*(1/sin1+sin2+.+sinN)
Дано натуральное число N. Вычислить: (1/sin1)*(1/sin1+sin2)*...*(1/sin1+sin2+...+sinN) Помогите пожалуйста с программой var s, ssin: real; i, n: integer; begin readln(n);ssin := 0;s := 1;...

Дано трёхзначное число. Определить, входит ли в него цифра 3
Дано трёхзначное число. Определить: А) входит ли в него цифра 3 Б) входит ли в него цифра а

Вывести на экран таблицу умножения числа n на числа от a до b
Составьте программу , которая выводит на экран таблицу умножения числа n на числа от a до b. Числа n, a,b вводятся с клавиатуры. Протокол: Введите границы: 2 7 Введите множитель: 11 ...

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

Записать выражение на языке Паскаль
выражение записать на языке Паскаль (200x+2,136y)^2+cosx-tgy не могу с этим справиться, совсем не понимаю

Определить, сколько из точек с заданными координатами попадает в круг радиусом R с центром в точке (a,b)
Помогите плиз решить задачу 3 способами) 1)счетчик (for to do) 2)предпроверка условия (while do) 3)постпроверка условия (repeat until) В ЭВМ вводятся координаты N точек. Определить, сколько из...

Заполнить массив змейкой
Доброго времени суток!. Прошу помощи для решения задачи о заполнени массива змейкой. ПРимер: 1 2 3 4 8 7 6 5 9 10 11 12 16 15 14 13 Добавлено через 1 час 30 минут UP!!!!

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

Сформировать квадратную матрицу порядка n по заданному образцу
Сформировать квадратную матрицу порядка n по заданному образцу: 1 2 3..... n n n-1 n-2...... 1 1 2 3...... n n n-1 n-2...... 1 ......... n n-1 n-2......1 c++

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

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

Подсчитать количество введенных чисел и указать наибольшее из них
A) С клавиатуры вводятся целые положительные числа. Подсчитать количество введенных чисел и указать наибольшее из них. B) Дан массив чисел, содержащий 20 элементов. Записать сначала все...

Теорема Пифагора
Условие:вводится значение 2 катетов треугольника надо найти гипотенуза треугольника. Зарание спасибо

Времена года
Написать алгоритм, который по введённому номеру времени (1-зима, 2-весна, 3-лето, 4-осень) выводит соответствующие этому времени года месяцы.

дано слово s1 получить слово s2 образованное нечетными буквами слова s1
помогите решить задачи: 1)дано слово s1 получить слово s2 образованное нечетными буквами слова s1 2)получить строку состоящую из пяти символов "*" 3)дан текст сколько раз в нем встречается символ...

Вывести числа в порядке убывания
.Даны два целых числа A и B (A < B). Вывести все целые числа, расположенные между данными числами (не включая сами эти числа), в порядке их убывания, а также количество N этих чисел. с помощью...

Решето Эратосфена
Ребят, помогите решить задачу. В программировании профан( Задача нужна в паскале «Решето Эратосфена». Алгоритм с таким названием позволяет выделить простые числа из интервала от 2 до N. Он состоит в...

Алгоритм Евклида
Найти НОД двух положительных чисел с помощью алгоритма евклида

Нарисовать робота на языке Паскаль
помогите пожалуйста нарисовать робота на языке паскаль!

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

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

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

как сложить строки
как складывать строки? никак не могу вспомнить!!!

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

сравнение символов
какой функцией перебирать строку символов посимвольно????? тоесть мне нужно допустим <а>sfdfsdgsgreg<b>sff<c></c>ddf</b></a> получить <a><b><c></c></b></a>

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

Сортировка простым слиянием
Помогите с задачей! Разработать алгоритм методом пошаговой детализации и программу, реализующую этот алгоритм Условие: сортировка простым слиянием+блок-схема)

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

Движущиеся картинки
1. получите на экране какую- либо фигуру и «оживите» ее. Например, пусть цыпленок летает; грузовик - едет, телефонный диск крутится и т.д. 2. Получите на экране изображение какой-либо фигуры и...

Вывести слово "Привет!" столько раз, сколько задаст пользователь
Задача №1. Написать программу выводящую слово "Привет!", столько раз, сколько задаст пользователь. Использовать цикл While!

Дана действительная матрица размером n x m, все элементы которой различны. В каждой строке выбирается элемент с наименьшим значением, затем среди этих
помощи прошу) Дана действительная матрица размером n x m, все элементы которой различны. В каждой строке выбирается элемент с наименьшим значением, затем среди этих чисел выбирается наибольшее....

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

Напечатать таблицу значений функции y = Sin(x) на отрезке [0,1] с шагом 0.1
Program Example_21; Var i : Real; Begin i:=0; While i<=1 Do Begin Writeln(i:2:1,' ',sin(i):4:3); i:=i+0.1; End; Readln;

В заданной строке заменить все двоеточия точкой с запятой
Работа со строками В заданной строке заменить все двоеточия ( : ) точкой с запятой ( ; ). Определить количество выполненных замен.

Дана строка символов; подсчитать, сколько раз среди символов строки встречается буква "х"
Здрасьте товарищи! спасите от еменуемой пересдачи пожалуйста!я глупая и бестолковая. Составьте прогу на Паскале пожалуйста. Она вроде не очень сложная, но все же: Дана строка символов;...

Записать циклы для решения
Записать циклы для решения следующей задачи: 1. Ввод 112 элементов массива Вс клавиатуры. Параметром цикла является переменная h. Нумерация начинается с 1....

Вывести символы строки в обратном порядке
Народ помогите пожалуйста решить задачу в Pascal. А то задали а решить немогу(( Задача: Дана строка s. Вывести символы строки в обратном порядке.

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

Составить программу, определяющую средний рост учащихся в классе.
ПОМОГИТЕ РЕШИТЬ НЕСКОЛЬКО ЗАДАЧ: 1. (используя оператор repeat): Составить программу, определяющую средний рост учащихся в классе. Данные о росте каждого учащегося вводятся с клавиатуры. ...

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

Найти все нечетные числа в массиве
дан массив В состоящий из 5-ти элементов, нужно найти все нечетные числа в этом массиве скопировать эти нечетные цифры в другой массив C, вывести массивы В и С

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

Дано натуральное число:верно ли, что данное число заканчивается на нечетную цифру.
Дано натуральное число:верно ли, что данное число заканчивается на нечетную цифру.

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

Как заполнить массив случайными числами -20 до 20
Может кто подсказать как завести в массив случайные числа от -20 до 20 ???оч надо!!

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

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

Является ли введенный символ гласной или согласной буквой
здравствуйте помогите пожалуйста решить задачи по програмированию мне очень нужна помощь в решении задач в паскале(на ветвление).. 1 задача- Даны натуральные числа n,к (n,k меньше равно 9999).Из...

напечатать квадрат натуральных чисел от 1 до n без операции умножения
Квадраты натуральных чисел Составить программу, позволяющую напечатать квадрат натуральных чисел от 1 до n без операции умножения: 12=1, 22=1+3, 32=1+3+5, 42=1+3+5+7, 52=1+3+5+7+9 и т.д. ребята...

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

Составить программу для замены в тексте слога "ма" на слог "па"
Помогите пожалуйста!!!!Решить 2 задачи: 1.Составить программу на языке Pascal для подсчета суммарного числа букв "е" и "о" в строковой величине. 2.Составить программу для замены в тексте слога...

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

Сходства и различия одномерного и двумерного массива
Помогите найти. Сходства и различия одномерного и двумерного массива. Не менее 3 сходств и различий

Удалить последние N символов из строки
Добрый день! Помогите пожалуйста решить задачку: Требуется удалить последние N символов в заданной строке. Мосжет задача и не сложная, но на форуме я не нашел этого. Спасибо.

Дано число A. Вычислить А^15, используя две вспомогательные переменные и пять операций умножения.
Дано число A. Вычислить А15, Используя две вспомогательные переменные и пять операций умножения. Для этого последовательно находить А2, А3, А5, А10, А15. вывести все найденные степени числа А.

Заполнить матрицу случайными числами
Помогите пожалуиста сделать матрцу 5Х5 со случайными числами от 0 да 9. Pascal.

Упорядочить последовательность по убыванию
Напишите программу PascalABC Упорядочить данную последовательность по убыванию. Массив задан датчиком случайных чисел на интервале . Размер произвольный.

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

Во введенной строке подсчитайте количество определенных символов
Во введенной строке подсчитайте количество символов "*" и символов "!".

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от –1000 до 1000
5) Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от –1000 до 1000. Опишите на русском языке или на одном из языков программирования алгоритм, который находит и...

Найти все простые числа в заданном интервале
Здравствуйте,можете подсказать,что не верно в задаче : у из интервала от A до B найти все простые.Определение простоты числа оформить в виде функции. я сделала но не полностью, надо чтоб 2 и 3 тоже...

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

Вычислить сопротивление электрической цепи для двух сопротивлений
Нужно вычислить сопротивление электрической цепи для двух сопротивлений. program el; Uses crt; var R,R1,R2:real; begin writeln('Вычисление сопротивления электрической цепи.');...

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