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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Отображение break на Блок-Схеме
Не подскажите как нарисовать по этому Блок-Схему? k10:=readkey; while k10<>#13 do begin Case k10 of #72: if pos=1 then pos:=5 else pos:=pos-1; #80: if pos=4 then pos:=1 else...

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Процедура: нахождение периметра треугольника
Всем привет) Не могу разобраться в чем ошибка Задача: Нужно написать программу по нахождению периметр треугольника (p=a+b+c), использую ПРОЦЕДУРЫ program abc; var a,b,c,p:integer; procedure...

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

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

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

В сберкассу на трехпроцентный вклад положили S рублей. Какой станет сумма вклада через N лет
.В сберкассу на трехпроцентный вклад положили S рублей. Какой станет сумма вклада через N лет? вот мои наработки но что то тут не так program m01; Var S:real; N,i:integer; begin

Вычислить среднее арифметическое n чисел. Составить блок схему
Последовательно вводятся n действительных чисел(n<=20).Вычислить среднее арифмитическое этих чисел.

Дано двузначное число, входит ли в него цифра 3, входит ли в него цифра а
Задача № 56 Дано двузначное число Определить : а) входной ли в него цифра 3; в) входит ли в него цифра а;

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

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

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

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

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

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

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

Выяснить, пройдет ли кирпич в прямоугольное отверстие
Даны вещественные положительные числа a, b, c, x, y. Выяснить пройдет ли кирпич с ребрами a, b, c в прямоугольное отверстие со сторонами x и y . Просовывать кирпич в отверстие разрешается только так,...

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

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

Запишите условный оператор, в котором значение переменной вычисляется по формуле: а + b, если а — нечетное и ab, если а — четное.
Помогите написать пожалуйста..не разбираюсь совсем..

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

По представленной блок-схеме составить программу и получите результат ее выполнения
Ребята помогите плиз с задачкой по Turbo Pascal: По представленной блок-схеме составить программу и получите результат ее выполнения Отладьте программу на следующем примере: a|b|c|y...

Вывести YES, если школьник дал верный ответ и NO в противном случае
Перевести из Си++ на Паскаль Добрый день, нашел на сайте задачку, возможно ее перевести на Паскаль, помогите, пожалуйста! В условии одной из задач на этом сайте написано: “Если данное...

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

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

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

Дана строка, содержащая англ. текст. Найти количество слов, начинающихся с буквы B
Дана строка, содержащая англ. текст. Найти количество слов, начинающихся с буквы B.

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

Вычислить сумму факториалов
ВЫЧИСЛИТЬ P=1+(1*2)+(1*2*3) +(1*2*3*...R)

Ввести пять чисел и найти наибольшее из них
В общем, вот: "Ввести пять чисел и найти наибольшее из них. Пример - ввести 5 чисел - 4, 15, 9, 56, 4. Наиб. число - 56". Нужно срочно, сделал бы сам, но времени нет. Помогите, плиз. Заранее...

Вылазиет "Неожиданный символ ''' "
Подскажите , вот программа. При компиляции вылазиет неожиданный символ в строке 10. В чем дело? Uses crt; var a1,b1,c1,a2,b2,c2,x,y:real; test,ntest:integer; BEGIN clrscr; write('введите...

Вычислить расстояние между точками
Помогите плизз нужно написать задачу на паскале. СРОЧНО НАДО!!!! "Известны координаты двух точек на плоскости. Составить программу вычисления расстояния между ними."

Написать программу, которая по номеру квартиры определяет номер подъезда и этажа, на котором находится квартира
В N-этажном доме M подъездов. На каждой лестничной площадке К квартир. Нумерация квартир в доме сквозная, начиная с 1. Написать программу, которая по номеру квартиры определяет номер подъезда и...

Узнать количество чисел, кратных 3 от 1 до 100
Помогите написать программу (легкую), но у меня возникли сомнения в моем коде. Нужно узнать кол-во чисел кратных 3 от 1 до 100. program zadacha; var i,k:integer; ...

Даны натуральные числа от 1 до 50. Найти сумму тех из них, которые делятся на 5 или на 7.
желательно в трех вариантах с предпроверкой и постпроверкой

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

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

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

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

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

Вычисление объема параллелепипеда
Написать программу вычисления объема параллелепипеда.

Вычислить сумму чётных чисел на отрезке от 10 до 30!Через цикл while
Вычислить сумму чётных чисел на отрезке от 10 до 30!Через цикл while

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

Дано число. Определить, оканчивается ли данное число на цифру 7
4. Дано число. Определить, оканчивается ли данное число на цифру 7.

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

Дан массив натуральных чисел. Найти сумму элементов кратных данному К.
Дан массив натуральных чисел. Найти сумму элементов кратных данному К.

Найти произведение всех целых чисел от а до b
Найти, произведение всех целых чисел от а до b (значения а и b вводятся с клавиатуры; b больше либо равно а Решите пожалуйста!!!

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

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

Составить программу, позволяющую получить словесное описание школьных отмето
Помогите ПлЗ А) Составить программу, позволяющую получить словесное описание школьных отметок (1 — «плохо», 2 — «неудовлетворительно», 3 — «удовлетворительно», 4 — «хорошо», 5 — «отлично»). Б)...

Дана сторона равностороннего треугольника. Найти площадь этого треугольника и радиусы вписанной и описанной окружностей
Дана сторона равностороннего треугольника. Найти площадь этого треугольника и радиусы вписанной и описанной окружностей.

Определить, какая из двух последних точек (B или C) расположена ближе к A
На числовой оси расположены три точки: A, B, C. Определить, какая из двух последних точек (B или C) расположена ближе к A, и вывести эту точку и ее расстояние от точки A.

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

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

Проверить, является ли введенное с клавиатуры число чётным
1)«Чётность». Проверить, является ли введенное с клавиатуры число чётным 2)Составьте программу на языке Turbo Pascal для расчета стоимо-сти покупки, состоящей из DVD-ROM, клавиатуры и нескольких...

Даны x, y, z. Вычислить a b, если:
Даны x, y, z. Вычислить a b, если: Програму и блок-схему, пожалуйста. P.S Зачем уравнения переписывать? И я не знаю как его перепечатать. Извините за неудобства.

Составить программу, которая анализирует человека по возрасту и относит к одной из групп
Составить программу, которая анализирует человека по возрасту и относит к одной из 4 групп: 1. дошкольник; 2. ученик; 3. работник; 4. пенсионер.

Подскажите как включить русский язык в Паскале 7,0 [?]
Здравствуйте уважаемые программисты! Я новичок. Подскажите пожалуйста, как включить русский язык в Паскале. Пробывал вставлять файл keyrus в папку Bin. Менял в свойствах Паскаля настройки, ничего не...

"Сортировка вставками":)
Пожалуйста обьясните, как создавать программы на тему сортировки вставками(с примером и пояснениями действий);)

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

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

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

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

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

Дано натуральное число n. Вычислить значение произведения P=2/3*4/5*6/7*...*2n/2n+1
Дано натуральное число n. Вычислить произведение первых n сомножителей. Задача на FOR P=2/3*4/5*6/7.....2n/2n+1 Заранее спасибо!!

Определить, является ли заданная целая квадратная матрица n-го порядка симметричной (относительно главной диагонали)
8. Определить, является ли заданная целая квадратная матрица n-го порядка симметричной (относительно главной диагонали). Блок схема

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

Строки символов. Дано слово. Проверить,является ли оно “Перевертышем”
решите пожалуйста через Паскаль напишите решение дано слово.Проверить, является ли оно Перевертышем( перевертышем называется слово ,читаемое одинаково как с начала, так и с конца)

Дано натуральное число n. Вычислить: n!
1.Дано натуральное число n. Вычислить: n! 2.остальное во вложении

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

Дано действительное число х. Вычислить:
(х-1)*(х-3)*(х-7)*...*(х-63) / (х-2)*(х-4)*(х-8)*...*(х-64) (х-1)(х-3)(х-3)...(х-63) - числитель дроби (х-2)(х-4)(х-8)...(х-64) - знаменатель дроби Составить 2 программы с любым из...

Цикл: вычислить сумму ряда S=1+X^1+x^2+X^3+...+x^n
нужно задать сумму S=1+X^1+x^2+X^3+...+x^n я пробывал записать так. но не получается program a1; var x,i,S,n:real; begin writeln('enter n and x'); readln(n,x); S:=0; i:=0;

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

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

Составить программу, которая вычисляет значение выражения по формуле
Составить программу, которая вычисляет значение выражения по формуле (все переменные принимают действительные значения): \frac{b+\sqrt{{b}^{2}+4ac}}{2a}-{a}^{3}c+{b}^{-2}

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

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

Поиск экстремума функции методом золотого сечения.
Вычислить экстремум функции с заданной точностью ε. Результаты вычисления вывести на экран монитора. Метод поиска экстремума задан(золотое сечение). Входные данные: Значение границ...

Дана строка. Определить, сколько раз входит в нее группа букв abc.
Дана строка. Определить, сколько раз входит в нее группа букв abc.

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

Вывести на экран все возможные различные способы представления числа в виде суммы натуральных чисел
Дано натуральное число N. Требуется получить и вывести на экран все возможные различные способы представления этого числа в виде суммы натуральных чисел (то есть, 1 + 2 и 2 + 1 – это один и тот же...

Определить, поместится ли круг с радиусом R в квадрат со стороной A
надо сделать 2 задачи 1.Определить поместиться ли круг с радиусом R в квадрат со стороной A 2.Определить поместиться ли квадрат со стороной A в круг с радиусом R Заранее спасибо

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

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

Дан номер месяца. Вывести название соответствующего времени года
Дан номер месяца (1 январь, ... ). Вывести название соответствующего времени года (зима, весна и т.д.)

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

Найти и напечатать все простые делители заданного натурального числа числа
1)найти и напечатать все простые делители заданного натурального числа числа

Дано натуральное число. Найти его наименьший делитель, отличный от 1
Дано натуральное число. Найти его наименьший делитель, отличный от 1

Вывести число дней, оставшихся до нового года
Помогите, пожалуйста, решить задачку (не через массив). Условие: ввести номер месяца и номер дня вывести число дней оставшихся до нового года. Я только начало написал((... uses crt; var n,d,j,i...

Сколько купюр разного достоинства отдаст покупатель, если он начинает платить с самых крупных?
У него имеются 1,2,5,10,100,500 руб. Сколько купюр разного достоинства отдаст покупатель, если он начинает платить с самых крупных?

Дано простое число. Найти следующее за ним простое число
Дано простое число. Составить программу,которая будет находить следующее за ним простое число.(напр. для 11-13,а для 23-29). Если исходное число не является простым, то вывести на печать 0. ...

Нужен пример любой простой программы
Доброго времени суток, форумчане! Требуется пример простенькой программы с кодом самой программы (желательно с комментариями и не такую простую как "hello world":D) и скриншотами работы этой...

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

как задать интервал
Дан интервал (с,d) и два произвольных массива R, Т размера n, k соответственно. Найти сумму отрицательных элементов массива R, попадающих в интервал (с,d), и сумму отрицательных элементов массива Т,...

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

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

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

Найти сумму и произведение всех целых чисел от 1 до 20.
Найти сумму и произведение всех целых чисел от 1 до 20.

Составить программу вычисления площадей различных геометрических фигур
Составить программу вычисления площадей различных геометрических фигур: S=\begin{cases}p \cdot l & \text{ , } k=1 \\p \cdot \frac{h}{2} & \text{ , } k=2 \\2\pi \cdot R \cdot h & \text{ , } k=3...

В строке удалить символ двоеточие и подсчитать количество удаленных символов
в строке удалить символ двоеточие и подсчитать количество удаленных символов Добавлено через 10 минут program p19; uses crt; var s,s1:string; t,t1:integer; begin readln(s); t1:=0;

Ввод значений элементов массива в одну строку
Получен ответ на тему: Ввод значений элементов массива в одну строку. Вот единственный ответ на эту тему: uses Crt; const n = 5; var a: array of integer; i: integer; begin ClrScr;...

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

Подсчитать количество положительных среди чисел а, b, с
40. Подсчитать количество положительных среди чисел а, b, с.

Дано слово. Верно ли, что оно начинается и оканчивается на одну и ту же букву?
Дано слово. Верно ли, что оно начинается и оканчивается на одну и ту же букву?

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

Найти наибольший нетривиальный делитель числа
Дано натуральное число. Найти его наибольший нетривиальный делитель или вывести единицу, если такового нет.

Составьте блок-схему алгоритма и программу вычисления произведения целых чисел из промежутка
Помогите пожалуйста 1. Составьте блок-схему алгоритма и программу вычисления произведения целых чисел из промежутка с шагом b=3. 3. Составьте программу вычисления суммы 180 первых членов...

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

модуль math
хотелось бы с ним разобраться кто нибудь поможет? Добавлено через 5 минут y=ctg(x-4) есть такой пример не могу его решить жду помощи

Решение ОДУ: задача Коши методом Рунге-Кутта
Всем доброго времени суток! Помогите,пожалуйста,реализовать на паскале решение задачи. http://pers.narod.ru/study/methods/05.html#cauchy Интересует первый пример(решить задачу Коши),метод...

Диалог с компьютером
Диалог с компьютером. uses Crt; Var Imaj: String; Vozrast: Integer; begin ClrScr; WriteLn(' Здравствуй, я компьютер, а тебя как звать?'); Write(' Меня зовут '); ...

Дана целочисленная квадратная матрица. Найти в каждой строке наибольший элемент и поменять его местами с элементом главной диагонали
9. Дана целочисленная квадратная матрица. Найти в каждой строке наибольший элемент и поменять его местами с элементом главной диагонали. Болк схема

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

Найти все натуральные числа, меньшие n, квадрат суммы цифр которых равен m
Помогите с задачами, пожалуйста! 1). Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. Какой суммарный путь пробежит...

Программа на таблицу умножения
Программа на таблицу умножения program auf2b; var a,b:byte; begin for a:= 1 to 19 do begin for b:=1 to 19 do begin

Разложение числа на множители
Дана прога uses SysUtils; var a,i : integer; begin readln(a); for i := 1 to a do if a mod i = 0 then writeln(i);

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

Как извлечь корень числа
Всем привет. Объясните, пожалуйста. Расписал, но возникли небольшие сложности. Как записать корень в турбо паскаль? Задание в прикрепленном файле

Вывод значений в виде таблицы
Программа такая:Написать программу,которая выводит таблицу значений функции y=-2.4*x^2+5x-3 в диапазоне от -2 до 2 с шагом 0.5. Программа написана правильно,но педагог говорит ,чтобы значения вышли...

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

Вычислить количество точек с целочисленными координатами, попадающими в круг радиуса R(R>0)
Составить програму для решения следующей задачи с помощью оператора (For-to-do). Вычислить количество точек с целочисленными координатами, попадающими в круг радиуса R(R>0) с центром в начале...

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

Дана прямоугольная матрица. Найти строку с наибольшей и наименьшей суммой элементов
Дана прямоугольная матрица.Найти строку с наибольшей и наименьшей суммой элементов.Вывести на печать найденные строки и суммы их элементов. Program matrix; USES Crt; Var a: array of integer;...

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

В ЭВМ вводятся по очереди данные о росте N учащихся класса. Определить средний рост учащихся класса.
Помогите пожалуйста найти решения! В ЭВМ вводятся по очереди данные о росте N учащихся класса. Определить средний рост учащихся класса. Зарание спасибо!

Что такое res?
program hds; user crt; var x, y, z : integer; a, b, max, min : real; begin writeln ('vvedite x, y, z'); readln (x, y, z); a:= x+y+z/2; b:= x*y*z; if a<b then min:=a else min:=b;

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

Дано натуральное число n,цикл for
Дано натуральное число n.сумма равна S=1-1/2+1/4-1/8+...+(-1)степень n*1/2 степень n вывести на экран сумму и какие значения принимает n. сделать через цикл for Добавлено через 39 минут var i,...

Привести 3-4 примера на оператор go to
Можете ли вы привести 3-4 примера на оператор go to? Заранее Благодарю!

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

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

Перевод декартовых координат в полярные
написать программу с помощью процедуры Три точки заданы своими декартовыми координатами a={1; 2}, b={1.2; 1}, c={-3; -4}. Вычислить полярные координаты этих точек. Полярный радиус r и полярный...

Идет k-ая секунда суток. Определить сколько полных часов и полных минут прошло к этому моменту
Идет k-ая секунда суток. Определить сколько полных часов и полных минут прошло к этому моменту.

Дано натуральное число n. Вычислить: 1/sin1+1/(sin1+sin2)+.+1/(sin1+sin2+.sinn)
Дано натуральное число n. Вычислить: 1/sin1+1/(sin1+sin2)+...+1/(sin1+sin2+...sinn)

дан массив целых чисел,состоящих из 25 элементов
1.дан массив целых чисел,состоящих из 25 элементов.Заполнить его с клавиатуры.найти: 1)сумму элементов,имеющих нечетные индексы. 2)число элементов массива,значение которых больше заданного числа А...

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

Pascal и windows 10
Доброго времени суток! Возможно ли установить pascal на windiws 10 домашняя версия? Откуда скачать?

Реализовать цикл с шагом 0.5
помогите решить проблему по заданию нужно сделать цикл с шагом 0.5,цикл for вот такие данные в цикле For i:=9 to 20 do нужно что бы в цикле у меня шаг делался 0.5 а то пробывал там менять...

Вычислить объем и площадь поверхности параллелепипеда
1. написать программу, вычисляющую объем и площадь поверхности параллелепипеда. операцию вычисления объема и площади поверхности параллелепипеда оформить в виде подпрограммы 2. умножить все...

Ошибка: Попытка чтения за концом файла
вот программа с заданием: //Сформировать файл F целого типа. //Найти S - сумму первых трех положительных компонент файла (считая, что они имеются в файле). //Если S>10, то получить из файла...

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

решение линейных уравнений Паскаль
Уважаемые форумчани! поделитесь парочку примерами по данной теме! с алгоритмом) весьма благодарен

Даны 2 числа , вывести на экран максимальное из них
Даны 2 числа , вывести на экран максимальное из них

Определить, сколько часов проработала вся бригада
В бригаде, работающей на уборке сена, имеется N сенокосилок. Первая сенокосилка работала m часов, а каждая следующая на 10 минут больше, чем предыдущая. Сколько часов проработала вся бригада?

Для целого числа К от 1 до 99 напечатать фразу “мне К лет”
1. Для целого числа К от 1 до 99 напечатать фразу “мне К лет”, учитывая при этом, что при некоторых значениях, К слово “лет” надо заменить на слово “год” или “года”.

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

Функция факториала
Разрешите обратиться с программой Необходимо описать функцию вычисления факториала и использовать ее для вычисления выражения: F=(n!*m!)/(n+m)!

Вывести самое длинное слово в строке.
Тема:строки. Задание: вывести самое длинное слово помогите пожалуйста!!!

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

Вывести на экран таблицу перевода из градусов по шкале Цельсия в градусы по Фаренгейту
1)Вывести на экран таблицу перевода из градусов по шкале Цельсия в градусы по Фаренгейту для значений от 15С до 30С с шагом в 1С. Перевод осуществляется по формуле: F=C*1.8+32. Program zf; Var...

Символ табуляции
ребят помогите в паскале нужен что то типо \t из си(пробелы не предлогать) Читал что типо char(#09) или char(09) это и есть табуляция... Но у меня дает какой то кружок.... мб кто знает в чём...

Определение дня недели по формуле Зеллера
программа, которая, используя формулу Зеллера, определяет день недели для произвольной даты. Указания: день недели григорианского календаря n (n=0 – Вс, 1 – Пн, …, 6 – Сб) определяется по формуле...

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

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

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

Дано целое число в диапазоне 0 – 9. Вывести строку – название соответствующей цифры
Дано целое число в диапазоне 0 – 9. Вывести строку – название соответствующей цифры на русском языке (0 – «ноль», 1 – «один», 2 – «два», ...).

К данному слову присоединить столько !, сколько в нем имеется букв
К данному слову присоединить столько !, сколько в нем имеется букв (например, из строки «УРА» получить «УРА!!!»).

Вычисление периметра и площади треугольника, используя процедуру и функцию
Здравствуйте! Обращаюсь за помощью. Никак не получается написать следующую программу: Написать программу вычисления периметра и площади треугольника на PASCAL. Стороны треугольника a,b,c ввести с...

Найти произведение всех чётных чисел от 2 до n
Паскаль) Найти произведение всех чётных чисел от 2 до n (n - введённое число с клавиатуры)

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

Выше и ниже побочной диагонали
Как найти минимум выше побочной и ниже побочной диагонали в квадратной матрице!??

Найти сумму элементов массива, больших данного числа А, (А вводится с клавиатуры)
Найти: a) Сумму элементов массива, больших данного числа А, (А вводится с клавиатуры). b) Сумму элементов массива принадлежащих промежутку от А до В (А и В вводятся с клавиатуры); c)...

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

На какой день улитка доползёт до вершины шеста?
Здравствуйте, есть одна задачка несложная вроде, и решение к ней тоже есть, задача на тему Div, Mod... вообщем мне очень нужно понять принцип решения задачи, объясните пожалуйста! Задача: Улитка...

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

Составить программу, которая запрашивает название футбольной команды и повторяет его на экране со словами: «…- это чемпион»
Помогите пожалуйста решить составить программу.Заранее благодарен. Составить программу, которая 1) запрашивает название футбольной команды и повторяет его на экране со словами: «…- это...

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

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

Найти периметр и площадь прямоугольного треугольника
Ребят, помогите пожалуйста найти ПЕРИМЕТР и Площадь прямоугольного треугольника , если с клавиатуры заданы длины 2 катетов!.. + ПЛОЩАДЬ прямоугольника , если h=a и ширина =b введены с клавиатуры!...

Вывести N раз число K.
1. Даны целые числа K и N (N > 0). Вывести N раз число K. Составить алгоритм решения задачи.

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

Составить программу вычисления площади треугольника с основанием а и высотой h
Составьте программу вычисления площади треугольника с основанием a и высотой h.Значение а и h введите с клавиатуры Добавлено через 1 минуту Составить программу вычисления площади треугольника с...

Дан массив А(20). Найти минимальный и максимальный элементы массива и их порядковые номера
дан массив А(20).Найти минимальный и максимальный элементы массива и их порядковые номера.

Ввести знак арифметической операции и 2 числа. Вывести результат
ввести с клавиатуры знак арифметической операции(либо +, либо -, либо *, либо /) и 2 числа.Вывести на экран результат .При вводе знака операции # -выход из программы Помогите пожалуйста, кто умный и...

Дан массив чисел, найти максимальный элемент и поставить его первым
Дан массив чисел, найти максимальный элемент и поставить его первым, а остальные элементы сдвинулись вправо. Помогите прошу!

Как скомпилировать приложение
помогите плиз...!=) Зарание спасибо!=)

найти решение уравнения ax+b=0, если оно существует
найти решение уравнения ax+b=0, если оно существует

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

Условный оператор. Дано двузначное число. Определить, кратна ли трем сумма его цифр
1. Дано двузначное число. Определить: -кратна ли трем сумма его цифр; -кратна ли сумма его цифр числу а (число a вводит пользователь)

Односвязный список
Добрый день, перелопатил множество тем по этому вопросы, но тем не менее остаются не понятные места. Мне требуется создать односвязный список(массив) из n элементов, то есть программа подразумевает...

Составить программу "Диалог"
Составить программу «Диалог», по которой компьютер задает вопрос, пользователь отвечает и в зависимости от его ответов компьютер выдает на экран соответствующее сообщение. В диалоге могут участвовать...

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

Перевод числа из десятичной системы счисления в любую другую
написать программу переводящую число из десятичной системы счисления в любую систему счисления

Составить программу для пересчета веса из фунтов в килограммы
один фунт равен 409.5 гр x-вес в фунтах y-вес в кг y=x*409.5/1000

Установить, что данное четырехзначное число читается одинаково слева направо и справа налево
Проверить истинность высказывания: "Данное четырехзначное число читается одинаково слева направо и справа налево".

Где скачать Pascal для Windows 10
Можете пожалуйста скинуть ссылку, или архив, нормального турбо паскаля который будет работать без проблем на windows 10. Я сколько смотрел, по этому сайту и по другим, нормального нигде не нашел.

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

Вычислить выражение: not(a or b) при a=true и b=false
Вычислить выражение: not(a or b) при a=true и b=false

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

Редактор блок-схем
Советую всем скачать! Хорошая программа! Создаёт блок-схему по тексту праграммы!

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

Массивы. Определить количество учеников, рост которых больше среднего роста по классу
Помогите пожалуйста.Не могу решить=( Рост 25 учеников класса представлен в виде массива. Определить количество учеников ,рост которых больше среднего роста по классу.

Решение уравнения методом итераций
1.3 синус(х+п/4)+2.3х-20=0 надо составить программу методом итераций точностью 0.0000001

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

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

Поменять местами наибольший и наименьший элемент массива
помогите решить две задачи..все просмотрела такого нету 1)дан одномерный массив из 10 элементов поменять местами наибольший и наименьший элемент. 2)Дан одномерный массив из 25 элементов найти...

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

СЛАУ, метод Гаусса с выбором главного элемента
Надо составить программу для решения слау. Метод решения: гаусс с выбором главного элемента. Надо чтоб матрица могла быть 100 на 100 ( array ). У меня есть текст программы, прога запускаеться, но...

Составьте программу для вычисления числа дней и месяца если даны...(ВЫБОР)
Здравствуйте уважаемые форумчане. Помогите пожалуйста понять постановку задачи и объясните, что нужно сделать. вот в общем задача... Составьте программу для вычисления числа дней и месяца если...

Составить программу перевода пятибальной оценки
Составить программу перевода пятибальной оценки в ее наименование с помощью условного оператора: 5 – отлично, 4 – хорошо, 3 – удовлетворительно, 2 – неудовлетворительно. Составить ту же...

Дан целочисленный массив размера N. Вывести вначале все его четные элементы, а затем - нечетные.
Помогите: Дан целочисленный массив размера N. Вывести вначале все его четные элементы, а затем - нечетные.

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

Вычисление стоимости поездки на автомобиле на дачу (туда и обратно)
Практическое задание №3 Написать программу вычисления стоимости поездки на автомобиле на дачу (туда и обратно). Исходными данными являются: расстояние до дачи (в километрах); количество бензина,...

Вывести слова в столбик
1) С клавиатуры вводится некоторое предложение. Вывести все его слова в столбик. 2) Введите своё ФИО, как одно текстовое данное. Используя пробел как разделитель между словами вывести на экран:...

Мелодия в паскале.
Здравствуйте... мне нужно в паскале сделать не очень сложную, но мелодию... команду со звуком я знаю только sound(x) ну и delay'ем помогать, но так я мелодию не напишу... может, есть программа,...

Вычисление площади треугольника по трем сторонам
Напишите программу вычисления площади треугольника по трем сторонам, пользуясь формулой S=√p(p-a)(p-b)(p-c), где a, b, c – длина сторон треугольника, задаваемые с клавиатуры, а p – полупериметр, т....

Данные числа x, y являются координатами точки, лежащей во второй координатной четверти
Проверить истинность высказывания: " Данные числа x, y являются координатами точки, лежащей во второй координатной четверти ".

Принадлежит ли точка отрезку
Подскажите в задачке... Даны три точки А,В,С. Определить принадлежит ли точка С отрезку АВ. Вот, как то так!

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

Составьте программу, которая вычисляет сумму чисел от 1 до 100. И блок схему
Составьте программу, которая вычисляет сумму чисел от 1 до 100. Пожайлуста

Дано натуральное число n. Найти количество нечетных цифр в нем
1)Дано натуральное число n. Найти кол-во нечетных цифр в нем. 2)Дано натуральное число n. Найти максимальную цифру. 3)Введите натуральное число. Найти сумму его цифр.

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

Цикл: Подсчитайте, сколько среди данных N чисел нулей, положительных чисел, отрицательных чисел.
Решите пожалуйста 4 задачи... Очень прошу... Выручите... 1) По данному числу n вычислите сумму 1+1/22+1/32+...+1/n2. Вводится одно число n, не превосходящее 100000. Необходимо вывести значение...

Напишите программу, которая выводит на экран квадраты целых чисел от числа a до числа b
Turbo Pascal. Напишите программу, которая выводит на экран квадраты целых чисел от числа a до числа b. Составить блок-схему.

Вычислить сумму: 1!+2!+3!+…+n!, используя функцию вычисления факториала числа k
1. Напишите программу вычисления суммы: 1! + 2! + 3! + … + n!, используя функцию вычисления факториала числа k. С меня "+" и зарание спасибо)

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

Даны три переменные. Если их значения упорядочены, то удвоить их
Даны три переменные: X, Y, Z. Если их значения упорядочены по убыванию, то удвоить их; в противном случае заменить значение каждой переменной на противоположное.Заранее спс

Старинная задача про быков, которв и телят
Имеется 100 рублей. Сколько быков, коров и телят можно купить на все эти деньги, если плата за быка -10 рублей, за корову - 5 рублей, за теленка - полтинник (0,5 рубля) и надо купить 100 голов скота?

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

Расставить коров так, чтобы минимальное растояние между коровами было как можно больше
На прямой расположены стойла, в которые необходимо расставить коров так, чтобы минимальное растояние между коровами было как можно больше. В первой строке вводятся числа N (2 < N < 10001) –...

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

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

Написать программу, которая выводит таблицу значений функции ( ЧЕРЕЗ FOR)
Написать программу, которая выводит таблицу значений функции y=-2.4^2+5x-3 в диапазоне от -2 до 2 с шагом 0,5 (ЧЕРЕЗ FOR) Добавлено через 14 часов 18 минут var y,z:real; x:integer; begin...

Перевести радианную меру угла в градусы, минуты и секунды.
Перевести радианную меру угла в градусы, минуты и секунды.

Подсчитать площадь дома, свободную площадь двора и длину забора
12)В углу прямоугольного двора размером 50х30 стоит прямоугольный дом размером 20х10. Подсчитать площадь дома, свободную площадь двора и длину забора. Примечание: в углу, где дом, забора нет. var...

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

Найти в массиве номер элемента, равного заданному числу
Дан массив из N элементов Найти номер элемента массива равный числу Х. Если такого элемента имеется, то вывести число 0. Помогите плз.

Составить программу нахождения площади квадрата, прямоугольника, круга и треугольника
Составить программу нахождения площади квадрата, прямоугольника, круга и треугольника.

Верно ли, что число начинается и заканчивается одной и той же цифрой
1. Дано натуральное число. Верно ли, что число начинается и заканчивается одной и той же цифрой. 2. Найти все трехзначные числа, у которых сумма цифр = a, а само число делится на b. "a" и "b"...

Цикл с предусловием.Вывести на экран n количество раз слово "цикл"
Используя цикл с предусловием (Pascal) вывести на экран n-ное количество раз слово "цикл".

Найти наименьший элемент двумерного массива
Найти наименьший элемент двумерного массива. Размер MXN. Элементы задаются на интервале . Uses crt; Var a: array of integer; i, j, n, m, min: integer; Begin clrscr; Write(‘сколько...

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

На плоскости XOY задана своими координатами точка A. Указать, где она расположена: на какой оси или в каком координатном углу.
Помогите решить задачу: На плоскости XOY задана своими координатами точка A. Указать, где она расположена: на какой оси или в каком координатном углу. Заголовок темы изменен модератором. Он...

Определить, имеется ли хотя бы одна пара равных между собой чисел
даны три вещественных числа а,в,с. Определить, имеется ли среди них хотя бы одна пара равных между собой чисел.

Найти сумму первой и последней цифры этого числа
Дано натуральное число n. Найти сумму первой и последней цифры этого числа

Вводить с клавиатуры 10 целых чисел,выдать на экран те числа,которые меньше введенного с клавиатуры числа,и их сумму
1ая программа. вводить с клавиатуры 10 целых чисел,выдать на экран те числа,которые меньше введенного с клавиатуры числа,и их сумму 2ая программа дано уравнения прямой линии Y=ax+b .Коэффициенты...

конец строки
Всем доброго времени суток! В общем есть такой код: while not eof(f1) do begin readln (f1,s); for i:=1 to length(s) do begin if s=' ' then while s=' ' do...

Отсортировать первую половину массива по возрастанию, а вторую по убыванию(методом выбора)
Заполнить массив из 10 элементов случайными числами в интервалеи отсортировать первую половину по возрастанию,а вторую по убыванию(методом выбора). пример: исход.массив 14 25 13 30 76 58 32 11...

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

Найти максимальное и минимальное из трех чисел
Даны действительные числа x, y, z. Найти: a) max (x, y, z); b) min (x, y, z).

Дан массив. Вывести все четные элементы
Дан массив. Вывести все четные элементы. (Паскаль и делфи)

Дано число n.. Из чисел 1, 4, 9, 16, 25, ... напечатать те, которые не превышают n.
Дано число n.. Из чисел 1, 4, 9, 16, 25, ... напечатать те, которые не превышают n.

Вычислить сумму чисел из промежутка
З А Д А Н И Я 1. Вычислить сумму чисел из промежутка . 2. Вывести на экран 56 символов & . 3. Получить на экране значения функции Y=SIN X , где x берется из промежутка и измеряется в...

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

Определить, попадает ли точка M(x,y) в круг радиусом r с центром в точке.
Определить, попадает ли точка M(x,y) в круг радиусом r с центром в точке(x0;y0);расчет провести в подрограмме функции.

Нужно написать программу подсчитывающую сумму квадратов чисел от 1 до N
Я 0 в математике, и в программирование. Но если вы не против, буду рад объяснениям и подсказкам. Школьный курс математики упустил, поэтому даже не могу понять что такое "сумма квадратов чисел" -...

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

Составить программу вывода на экран числа, вводимого с клавиатуры. Выводимому числу должно соответствовать сообщение "Вы ввели число"
Составить программу вывода на экран числа, вводимого с клавиатуры. Выводимому числу должно соответствовать сообщение "Вы ввели число"

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

Ошибка 113. Ошибка в инструкции
uses crt; const nmax=20; var a:array of integer; n,m,i,j,l:byte; sm,b:integer; begin clrscr; randomize; repeat write('Количество строк до ',nmax,' m=');

Дана строка. Преобразовать все строчные буквы в прописные и наоборот
Дана строка. Преобразовать все строчные буквы в прописные и наоборот

Определить, является ли заданная строка (фраза) палиндромом
(7)Напишите программу определения, является ли заданная строка (фраза) палиндромом. (Палиндромом называется фраза, слово или стих , одинаково читающиеся слева направо и справа налево. Фраза - «А РОЗА...

Даны три целых числа. Вывести на экран те из них, которые Являются четными
Вот опять засела на задачка ,задали 13 задачек решить ....7 задач сама решила ,а вот эти не могу ,запуталась ...кто сможет решите пожалуйста!)))) Неполный условный оператор:1.Даны три целых числа....

Как указать путь к файлу
Всем привет! Как в Паскале написать правильно путь к текстовому файлу? Извините за флуд если что.

Дана сторона равностороннего треугольника. Найти площадь этого треугольника
:-[ Здравствуйте!!! Прошу помочь с решением в Паскале!!! :confusion: 1. «Программирование алгоритмов линейной структуры»: 1.1. Дана сторона равностороннего треугольника. Найти площадь этого...

Найти наибольший общий делитель трех чисел
8.Найти наибольший общий делитель трех чисел.

Найдите все целые решения уравнения на отрезке [0,1000] и выведите их в порядке возрастания
Вводятся 4 числа: a, b, c и d. Найдите все целые решения уравнения ax3 + bx2 + cx + d = 0 на отрезке и выведите их в порядке возрастания. Если на данном отрезке нет ни одного решения, то ничего...

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

Точка А(х, у) принадлежит прямоугольнику
. (x1, y1) и (х2, y2) — координаты левой верхней и правой нижней вершин прямоугольника. Точка А(х, у) принадлежит прямоугольнику.

Для заданного числа N составьте программу вычисления суммы S=1+1/2-1/3+1/4-1/5+..+1/n
Здравствуйте! помогите пожалуйста решить задачу,3 разными способами,3 разных оператора ветвления: Для заданного числа N составьте программу вычисления суммы S=1+1/2-1/3+1/4-1/5+..+1/n, где n...

Слова,начинающиеся и оканчивающиеся на одну и ту же букву;
Дано предложение.Вывести на экран: а)слова,начинающиеся и оканчивающиеся на одну и ту же букву; б)его слова,которые содержат 3 буквы Е; в)его слова,которые содержат хотя бы одну букву О. Помогите...

Вывести на экран ряд чисел Фибоначчи, состоящий из n элементов
Вывести на экран ряд чисел Фибоначи, состоящих их n элементов.Числа Фибоначи-этоэлементы числовой последовательности 0,1,2,3,5,8,13,21,34,55,89,144,в котрой каждое последующее число равно сумме двух...

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

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

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

Даны числовой ряд и некоторое число е. Найти сумму тех членов ряда, модуль которых больше или равен е
Даны числовой ряд и некоторое число е. Найти сумму тех членов ряда, модуль которых больше или равен е. Общий член ряда имеет вид: a(n индекс)=10^n/n!

Найти все двузначные числа, которые делятся на n или содержат цифру n
Найти все двузначные числа, которые делятся на n или содержат цифру n

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

Коммерсант, имея стартовый капитал
Коммерсант, имея стартовый капитал k рублей, занялся торговлей, Которая ежемесячно увеличивает капитал на р%. Через сколько лет он накопит сумму s, достаточную для покупки собственного магазина?

Не создается exe - error 146: file access denied
Доброй ночи. Если я компилирую программу при destination memory-то программа работает, но не создается exe.файл. Если при destination disk-то программа выдает error 146:file access denied. Как...

Составить программу, определяющую результат гадания на ромашке
Составить программу, определяющую результат гадания на ромашке - "любит - не любит", взяв за исходное данное кол-во лепестков n.

Возвести число x в степень y
Нужно возвести число x в степень y (1<x<10; 1<y<1000), получилась такая программа: var x,i,y:integer; S:longint; begin readln(x,y); s:=1; for i:=1 to y do s:=s*x;

Нахождение среднего арифметического значения одномерного массива
Здравствуйте! Написал программу, программа работает, однако я не знаю, правильно я её написал или нет. Посмотрите пожалуйста и подскажите если вдруг что не так. Задача #1. Составьте программу...

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

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

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

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

Вычисление числа пи
Вот программа, которая вычисляет число пи program pi; var n,s1,s2,pi,c :real; i :integer; label iteration; BEGIN writeln('Введите количество знаков'); readln(i);

Дано число A (>1). Вывести найбольшее из целых чисел К, для которых сумма 1+1/2+.+1/k будет меньше А и саму эту сумму
Дано число A (>1). Вывести найбольшее из целых чисел К, для которых сумма 1+1/2+...+1/k будет меньше А и саму эту сумму.

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

Что такое byte?
var i(byte)--- это че обесните !!!!!! p:real; begin p:=1; for i:=13 to 91 do if i mod 13=0 then p:=p*i; write('P=',p:0:0); readln end.

Определите значения переменных s и i после выполнения фрагмента программы на Паскале
Определите значения переменных s и i после выполнения фрагмента программы на Паскале: Вот так вот звучит задание и сам код к нему, но я не могу понять, как этот код дописать.(я профан) s:=0;...

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

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

В массиве хранятся сведения о количестве осадков. Определить общее количество осадков
2. В массиве хранятся сведения о количестве осадков, выпавших за каждый день января. Определить общее количество осадков за январь.

Напечатать таблицу перевода 1, 2, ..., 20 долларов США в рубли по текущему курсу
5.10. Напечатать таблицу перевода 1, 2, ..., 20 долларов США в рубли по текущему курсу (значение курса вводится с клавиатуры).

Определить, сколько досок надо купить, чтобы поставить сплошной забор
Помогите написать программу: Имеется садовый участок, имеющий форму прямоугольника со сторонами A метров и B метров. Сколько досок надо купить, чтобы поставить сплошной забор? Ширина одной доски 10...

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

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

Дано N цілих чисел. Знайти кількість парних серед них.
Дано N цілих чисел. Знайти кількість парних серед них. ТУ. У першому рядку стандартного вхідного потоку міститься N (N<1000) – кількість чисел. У наступному рядку через пропуск дано самі числа. У...

Определить максимум и минимум из четырех чисел
Определить максимум и минимум из четырех чисел. найти разницу max-min. (без random'а)

Найти среднее арифметическое чётных чисел.
Вводится последовательность из N целых чисел. Найти среднее арифметическое чётных чисел.

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

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

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

Вывести сначала четные потом нечетные элементы массива
Задача на одномерный массив: Дан массив размера N. Вывести его сначала элементы четные потом нечетные.

Составить программу вычисления площади окружности и длины окружности
Помогите,пожалуйста,составить программу Turbo Pascal 1.ввести с клавиатуры велечину радиуса,на экран выдать длину окружности 2.задать с клавиатуры натуральное число N.Найти среднее...

Реализовать функцию "Исключающее ИЛИ" двух логических переменных x и y
Вот так все работает : program _Xor; var number1,number2 : byte; function _xor (num1,num2 : byte) : byte; begin if ((num1=1) and (num2=0)) or ((num2=1)and(num1=0)) then _xor:=1 ...

Найти сумму элементов массива, принадлежащих диапазону.
4. Заполнить массив из 16 элементов (случайным образом) целыми значениями в диапазоне от -10 до 25 включительно. Найти сумму элементов массива, принадлежащих диапазону. 5. Составьте программу,...

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

Вычислить сумму всех двузначных чисел
составить програму вычисления суммы всех двузначных чисел.

Дано натуральное число. Найти первую и последнюю цифры числа
Помоги пожалуйста решить задачки. Не фига вспомнить не могу. Завтра сдать надо, а то к зачету не допустят. Фото с 6'ю заданиями. Добавлено через 3 минуты Шестое у вас на форуме уже нашел.

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

Напечатать числа следующим образом:
10 10.4 11 11.4 ... 25 25.4 Братцы составте программу полностью:)

Алгоритм Евклида нахождения наибольшего общего делителя (НОД) неотрицательных целых чисел
Уважаемые и бесконечно мною любимые Локи и Цербер. Будьте кисаньками (хоть вы и песики :D ), помогите с задачкой. Буду благодарна, если вы мне хотяб объясните что, блин, мне надо в ней сделать! ...

Запись массива в текстовый файл.
Есть массив a(1,2,2,3,4,5,2,1,2,3,4,5); Как записать его в текстовый файл? Помогите пожалуйста.

Вычислить (x-1)(x-3)(x-7)...(x-63)/(x-2)(x-4)(x-8)...(x-64)
Вычислить: (x-1)(x-3)(x-7)...(x-63)/(x-2)(x-4)(x-8)...(x-64)

Решение системы нелинейных уравнений методом Ньютона
в институте задача по практике написать программу решения системы нелинейных уравнений методом Ньютона на Паскале контрольные примеры 1 система 2-x^2-y^2=0 1-x^2+y^2=0 2 система

Вычислить значение выражения max(x+y+z,xyz)+3
1)написать программу которая приобразовывает слова в код . изминить эту программу чтоб она выводила предыдущее значение . 2)составить программу вычисления выражения max(x+y+z,xyz)+3

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

Отчёт по практике. Пишу впервые. Саму программу уже написала. Может у кого-нибудь есть примеры как писать такие отчёты?
Может у кого есть какие-нибудь примеры как правильно писать отчёт по учебной практике? С таким вообще впервые сталкиваюсь. То есть все документы и правильное оформление. У меня с этим очень туго....

11,11х. При переносе запятой на 2 знака вправо число увеличилось в 4 раза, чему равен х?
11,11х. При переносе запятой на 2 знака вправо число увеличилось в 4 раза. чему равен х? х-индекс- это основание,система счисления.( логическая задача, ответ объясните пожалуйста)

Что значит цифра 5 после двоеточия в write(a[i,j]:5)
write(a:5) что значит цифра 5 после двоеточия?

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

Оператор выбора Case. По номеру дня недели напечатать его название
По заданному порядковому номеру дня недели напечатать его название и указать рабочий это день или не рабочий (оператор выбора Case). Например: Введите № дня недели -> 1 Это...

Error: Incompatible types: got "Boolean" expected "Int64"
Здравствуйте, возникла ошибка в программе project1.lpr(43,6) Error: Incompatible types: got "Boolean" expected "Int64" Вот код: uses CRT; Label m1,m2; var ans : char; ch : integer; ...

Напечатать таблицу стоимости 50, 100, 150,..., 1000г сыра
1.Напечатать таблицу стоимости 50,100,150,...,1000г сыра(стоимость 1 кг вводится с клавиатуры). 2.Найти сумму -1^2+2^2-3^2+4^2+...+10^2.Условный оператор не использовать. Пожалуйста помогите решить.

Инициализация массива и вывод его на экран
1. Заполнить массив из восьми элементов следующими значениями: первый элемент массива равен 37, второй – 0, третий — 50, четвертый — 46, пятый — 34, шестой 46. седьмой 0, восьмой —13.

Элементы одного массива присвоить другому массиву
Например, у нас есть массив A со значениями элементами 7 1 2 3 8. Как, например, значения элементов 1 2 3 присвоить массиву B. Пробовал, не получилось: for i:=2 to i=4 do b:=a;

Даны три числа а,б,с найти наибольшее и вывести на экран
Надо сделать используя if,then,else я сделал так PROGRAM naibolshee; Uses crt; Var a,b,c: read; BEGIN Clrscr; read (a,b,c) if (a>b) and (a>c) then begin writeln ('naibolshee a=',a);

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

Если отрицательно только одно из чисел, то оба значения увеличить на 0,5
1) Даны действительные числа X, Y. Если X, Y. – отрицательны, то каждое значение заменить его модулем; - если отрицательно только одно из них, то оба значения увеличить на 0,5; - если оба...

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

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

Вычислить сумму S=1*2+2*3*4+3*4*5*6+...+n(n+1)...2n.
Вот такое вот задание: дано натуральное число n= 15. Вычислить сумму S=1*2+2*3*4+3*4*5*6+...+n(n+1)...2n. Вот такая получилась программа: n:=15; s:=0; for i:=1 to 15 do begin ...

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

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

Какие коды у клавиш Enter и стрелок управления курсором?
Какие коды у стрелок и "Enter" на клавиатуре?

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

Чему будет равно значение целой переменной «a» после выполнения фрагмента программы?
1.Чему будет равно значение целой переменной «a» после выполнения этого фрагмента программы? a:=2; for i:=0 to 3 do begin a:=a+i end; 2.Чему будет равно значение целой переменной «a» после...

"Нельзя преобразовать тип string к char"
Помогите исправить программу: var str: string; i,n: byte; begin write('Введите строку: '); readln(str); n:=length(str); for i:=1 to n do

Используя только операции сложения и вычитания, найти частное от деления нацело N на K, а также остаток от этого деления
Помогите с решением Даны целые положительные числа N и K. Используя только операции сложения и вычитания, найти частное от деления нацело N на K, а также остаток от этого деления. var n, k,...

Определить минимальное и максимальное число в последовательности
Даны две задачи. 1) Дана последовательность (любая) чисел. Определить минимальное и максимальное число в этой последовательности. 2) Вводится последовательность чисел ( любая ). Определить...

Вычислить: sin(x)+sin^2(x)+sin^3(x)+ ... +sin^n(x)
n - натуральное. х - действительное. Вычислить: sin(x)+sin^2(x)+sin^3(x)+ ... +sin^n(x);

Дано натуральное число n и действительное число x: вычислить значение выражения
Sinx+sinx'квадрат'+...+sinx'n'

Решить уравнение методом касательных
Решить уравнение In (x)-x+1.8=0 с точностью е на отрезке методом касательных.

Определить координаты вершины параболы
Определить координаты вершины параболы y=ax2+bx+c.Коєфициенты a,b,c заданы

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

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

Определить, правда ли, что заданное натуральное число N является двузначным и кратно K
1. Составление программ разветвляющейся структуры: Проверить, попадает ли число a в промежуток . 2. Составление программ разветвляющейся усложнённой структуры: Составить программу определяющую,...

Где можно скачать Graph.tpu?
Установил себе Turbo Pascal 7.1 а там нету Graph.tpu подскажите откуда можно скачать! Заранее спасибо

Объектно ориентированное программирование
Я решил написать статью посвященную ООП, т.к. на нем основано современное программирование. Писал я эту статью для FAQ. И так, что же такое это ООП? Первая часть Википедия: ...

Найти сумму элементов главной (побочной) диагонали матрицы
3. Дана квадратная матрица порядка M. Найти сумму элементов ее главной побочной диагонали.

Вывести на экран различные приветствия в зависимости от введенного времени суток
4.Договоримся, что утро длится с 8 до 12 часов, день – с 12 до 17 часов, вечер – с 17 до 23 часов и ночь – все остальное время. Задачу решить двумя способами: с помощью условного оператора и...

Известны координаты двух точек. Найти расстояния от начала координат до этих точек.
Известны координаты двух точек A(x1,y1) и B(x2,y2). Найти расстояния от начала координат до этих точек. Не знаю как высчитать расстояние для каждой точки. Прошу помощи у тех кто сталкивался с...

5 задач на сортировку массивов
Здравствуйте. Сегодня задали решить 5 задач на сортировку массивов. Т.к. мои познанию в паскале стремятся к минимуму, прошу вас помочь мне их решить: Примечание: a,b - это переменные. i,k,j, i+1,...

Перевернуть каждое слово строки
Программа должна написанное слово слева направо, писать справа налево, она так и делает, но все кроме последнего слова. В чем ошибка? var s: string; i,j,k,_i: integer; begin readln(s); ...

Схема Горнера
Два многочлена задаются степенями – целыми числами N,M . Например, 1-ый многочлен: N*XN+(N-1)*XN-1+….+X 2-ой многочлен: M*XM+(M-1)*XM-1+….+X Написать программу-функцию вычисления значений...

Получить все числа Армстронга, состоящие из двух, трех и четырех цифр
Натуральное число из n цифр является числом Армстронга, • если сумма его цифр, возведенных в n-ю степень, равна самому числу (как, например, 153= 13+53+33). Получить все числа Армстронга, состоящие...

Сума парних чисел
program z1; uses crt; var n,i,s:integer; begin clrscr; s:=0; readln(n); if n<=50 then for i:=1 to n do

Перечислить все возрастающие последовательности длины k из чисел 1.. N в лексикографическом порядке
Задание: Перечислить все возрастающие последовательности длины k из чисел 1..n в лексикографическом порядке. (Пример: при n=5, k=2 получаем: 12 13 14 15 23 24 25 34 35 45.) Нашел решение, но понять...

Ввод/вывод матрицы из файла
Помогите решить, ребятки! оочень нужно. Задание: Дана квадратная матрица A порядка k. Определить максимальный по модулю элемент каждой строки. Результаты записать в одномерный массив. Исходная...

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

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

Сколько раз в тексте встречается заданное слово
прошу помочь!!!! Сколько раз в тексте встречается заданное слово (слова разделены пробелами)?

Напечатать те из двузначных чисел, которые делятся на 4, но не делятся на 6.
21. Напечатать те из двузначных чисел, которые делятся на 4, но не делятся на 6.

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

Перевод чисел в десятичную систему счисления
Задание: Написать программу перевода следующих чисел 10000011; 1010000110; 101100110,011011; 100100110,101011; из двоичной системы в десятичную. а это число 1022,2 из восмиричной перевидите в...

Вычисления стоимости покупки с учётом скидки
Напишите пожалуйста программу вычисления стоимости покупки с учётом скидки. Скидка в 10% предоставляется, если сумма покупки >1000 руб. Ниже представлен рекомендуемый вид экрана во время работы...

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

Задана матрица (двумерный массив) A размером N x М
Добрый вечер Форумчане!!! Помогите пожалуйста с написанием программы на Паскале. Сам дуб в программировании а для курсача нужно! Пожалуйста! Задание: Разработать алгоритм и написать программу на...

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

Вычислить y=SIN 1+sin 1.1+sin 1.2+...+sin 2
Помогите пожалуйста!!!! 2.Вычислить y=SIN 1+sin 1.1+sin 1.2+...+sin 2 HELP!!!

Протабулировать функцию y = sinx на промежутке [0; 3,1], с шагом h = 0,1 и вычислить среднее арифметическое
Вот условие задачи: Протабулировать функцию y = sinx на промежутке , с шагом h = 0,1 и вычислить среднее арифметическое (s1) значений функции больших, чем 0,1 и меньших, чем 0,6. uses crt; var...

Дана масса в килограммах. Найти число полных центнеров в ней
Дана масса в килограммах. Найти число полных центнеров в ней.

Значение переменных X, Y, Z, поменять местами так, что бы они оказались упорядоченными по возрастанию.
И снова здравствуйте) Объясните пожалуйста алгоритм составление следующей задачи. Значение переменных X, Y, Z, поменять местами так, что бы они оказались упорядоченными по возрастанию.Program...

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

Можно ли представить число в виде суммы двух квадратов натуральных чисел.
2)Дано натуральное число n. Проверьте, можно ли представить его в виде суммы двух квадратов натуральных чисел. На вход программе подается натуральное число n. Выведите YES или NO в зависимости от...

Найти сумму квадратов всех элементов массива
Дан массив целых чисел, найти сумму квадратов всех элементов массива.

Из слова яблоко путем "вырезок" и "склеек" его букв получить слова блок и око
Из слова яблоко путем "вырезок" и "склеек" его букв получить слова блок и око.

Прикольная прога "Числа Фибоначи"
Попробуйте набрать мне понравилась... program zadacha ;{числа Фибоначчи} var a,b,c,n,i:integer; begin writeIn ('введите число N=') ; readln (n) ; a:=l; b:=l; writeln (a,b) ; i:=3;...

Найти все двузначные числа, в которых есть цифра N, или само число делится на N
Найдите все 2-значные числа, в которых есть цифра N, или само число делится на N

Программа нахождения значения выражения
Написать программу,которая будет находить значения выражения 5/(x-2)

По заданному номеру номеру масти м и номеру достоинства карты к определить полное название карты
Мастям игральных карт условно присвоены следующие порядковые номера:пики-1, трефы-2 , бубны-3, червы-4. Достоинству карт присвоены следующие порядковые номера:валету - 11, даме-12, королю- 13, тузу-...

Дано натуральное число, определяющее стоимость товара в копейках. Выразить стоимость в рублях и копейках
Пожалуйста, помогите! Завтра контрольная! 4)Дано натуральное число(1<n<9999), определяющее стоимость товара в копейках. Выразить стоимость в рублях и копейках, например, 3 рубля 21 коп, 15 рублей...

Самоучитель по паскалю
Какой самоучитель по паскалю лучше для полного нуба? Начинать буду с нуля, знаний никаких.

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

Описать процедуру Trim(S), удаляющую в строке S начальные и конечные пробелы
нужно решить задачу до завтра, помагите пожалуйста! Задача: Описать процедуру Trim(S), удаляющую в строке S начальные и конечные пробелы.

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

Однонаправленный список. Вывод элементов, списка. Удаление списка.
Создать однонаправленный список натуральных чисел. Найти и вывести элементы списка, кратные 3. Удалить из списка все эти элементы и вывести обновленный список. Удалить список.

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

Найти последнюю цифру числа, отыскав остаток от деления n на 10
Чтобы найти последнюю цифру числа n надо найти остаток от деления n на 10. Дано натуральное число. Выведите его последнюю цифру.

Найти все трёхзначные числа, которые при делении на 2 дают остаток 1
1. решила 2. Найти все трёхзначные числа, которые при делении на 2 дают остаток 1, при делении на 3 остаток 2, при делении на 4 остаток 3, а само число делится на 5. перечитываем правила форума.

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

Даны действительные числа х, у, z. Вычислить min2(x + у + z/2, xyz) + 1
Даны действительные числа х, у, z. Составить программу, вычисляющую min2(x + у + z/2, xyz) + 1.

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

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

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

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

Найдите среднее арифметическое всех четных элементов массива
Задан массив из 10 целых чисел. Найдите среднее арифметическое всех четных элементов массива. Хелп плиз

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

Нужны модули *.TPU
Где можно скачать модули *.TPU ?

Написать программу пересчета расстояния из верст
Практическое задание №4 Написать программу пересчета расстояния из верст в километры (1 верста равняется 1066,8 м). Ниже представлен рекомендуемый вид экрана во время работы программы Пересчет...

Матрица. Поменять местами элементы главной и побочной диагоналей
Задана матрица Х (Н) (Н<=15). Поменять местами элементы главной и побочной диагоналей. Отпечатать матрицу и отрицательные элементы главной диагонали матрицы Х.

Как вызвать в Pascal системную команду "pause"?
Подскажите пожалуйста, как можно вызвать в Pascal системную команду "pause"? Все знают, что эта команда выдает в консоль сообщение: "Для продолжения нажмите любую клавишу..." Так вот в C++ её очень...

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

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

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

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

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

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

замена символов в паскале
доброго времени суток! помогите написать программу, которая заменяет одни символы в строке на другие, например, дано " x and y, b and a", конечный результат: "x&y, b&a"

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

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

Возведение любого числа в любую степень (учитывая "-")
помогите!!! очень нужен код проги

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

Вывести на экран числа от 1 до n, которые делятся на 3
С программированием знаком только месяц, поэтому не опытен,прошу вашей помощи! Вот у меня есть задача: Пользователь вводит n,вывести на экран от 1 до n , которые делятся на 3. (циклы) ...

Дана строка S и число N. Преобразовать строку S в строку длины N следующим образом: если длина строки S больше N, то отбросить первые символы
Дана строка S и число N. Преобразовать строку S в строку длины N следующим образом: если длина строки S больше N, то отбросить первые символы, если длина строки S меньше N, то в ее начало добавить...

Среди первых трех цифр дробной части заданного положительного вещественного числа есть цифра 0
Пожалуйста, помогите написать программу в паскале. В результате выполнения которой булевская переменная t получает TRUE, если выполняется указанное условие, и FALSE в противном...

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

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

Возведение в степень
Написать подпрограмму возведения числа в целую степень. Проверить ее работу на следующих данных: 2 в 10-той, З в 5-той,7 в 0-вой.

Из данного списка спортсменов распечатать сведения о тех из них, кто занимается плаванием
"Из данного списка спортсменов распечатать сведения о тех из них, кто занимается плаванием. Указать возраст, сколько лет они занимаются спортом". Собственно такая задача. Program sportmans; Type...

Вывести фразу "Hello, World!"
Напишите программу,которая выводить следующий текст: program Hello_World; begin WriteLn('Hello, World!'); end. Имя Входного Файла: input.txt Имя Выходного Файла: output.txt Ограничение...

Как скопировать код?
А КАК ПЕРЕКИНУТЬ ОТСЮДА В ПАСКАЛЬ КОГДА КОПИРУЮ ВСТАВИТЬ НЕ ПОЛУЧАЕТСЯ!!!((((

С помощью генератора случайных чисел заполнить массив целыми значениями, лежащими в диапазоне от 50 до 100 включительно.
Задание: 11. Массив предназначен для хранения значений веса двадцати человек. С помощью генератора случайных чисел заполнить массив целыми значениями, лежащими в диапазоне от 50 до 100 включительно....

Введите из текстового файла целочисленную матрицу размером 6х8
Введите из текстового файла целочисленную матрицу размером 6х8. переверните матрицу, поменяв 1-ю строку с 6-й, 2-ю с 5-й, 3-ю с 4-й, и запишите полученную матрицу в другой файл. Добавлено через 44...

Как открыть файл PAS или экспортировать в турбо паскаль
Ребята помогите чайнику.Не могу открыть файл в турбо паскале.Он размещен у меня на рабочем столе.Как его экспортировать в прогу.В какой папке паскаля хранятся файлы с расширением PAS.

Вычислить период колебания маятника длины L
Вычислить период колебания маятника длины L

Определить min элемент главной диагонали и max элемент побочной диагонали квадратного массива
Определить минимальный элемент главной диагонали и максимальный элемент побочной диагонали квадратного массива.

Составить программу для вычисления и печати таблицы значений функции y=f(x) на отрезке [a,b] с шагом h
Составить программу для вычисления и печати таблицы значений функции y=f(x) на отрезке с шагом h. (a=0, b=1, h=0.1) Функция f(x)={x}^{3}+\sqrt{1.2+x} Помогите, буду ну оооочень благодарна!

Дано вещественное число X и целое число N (> 0). Найти значение выражения
Дано вещественное число X и целое число N (> 0). Найти значение выражения X − X3/(3!) + X5/(5!) − ... + (−1)N·X2·N+1/((2·N+1)!) (N! = 1·2·...·N). Полученное число является приближенным значением...

Составить программу вычисления значения функции при любом значении а
x=\sqrt{\frac{(2a+\sin \left|3a \right|)}{3,56}}

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

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

Программа для подсчета количества букв в строке!
Как на Турбо Паскале написать программу для подсчета всех русских букв используемых в написанной строке. например Текст = сегодня днём над городом прошел дождь программа должна уметь сама...

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

По номеру месяца вывести его название месяца
Дан номер месяца – целое число в диапазоне 1-12 (1- январь, 2 –февраль и т.д.). Вывести название месяца.

Вычислить длину окружности и площадь круга
Радиус окружности равен 800. Вычислить длину окружности и площадь круга. Результаты печатать до 5-го знака. uses Crt; Var r: integer; L, Pl: real; begin ClrScr; r:= 800; L:=...

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

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

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

Чем отличается массив от множества
чем отличается массив от множества?

Найти произведение чисел 1,2,3,4,5 через цикл while
1)Найти произведение чисел 1,2,3,4,5 через цикл while 2)Найти произведение пяти любых чисел через цикл while 3)Найти произведение любых чисел через цикл while

Вычислить сумму ряда
1)Составить программу вычисления суммы первых n=10; 20; 30 членов ряда: 2)Составить алгоритм и написать программу вычисления следующих сумм 3)Составить программу и вычислить сумму ряда с...

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

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

Вывести на экран самое длинное и самое короткое название
Исправте , пожалуйста , ошибки . 1)Даны названия трех городов . Вывести на экран самое длинное и самое короткое название . Uses CRT; var a,b,c:string; begin writeln...

У гусей и кроликов 64 лапы. Сколько могло быть кроликов и гусей?
1. У гусей и кроликов 64 лапы. Сколько могло быть кроликов и гусей? Вывести все возможные варианты. 2. Сиропчик и Лимончик покупали и пили кока-колу, пустые бутылки сдавали и снова покупали...

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

Алгоритм Евклида нахождения наибольшего общего делителя (НОД) неотрицательных целых чисел
Алгоритм Евклида нахождения наибольшего общего делителя (НОД) неотрицательных целых чисел основан на следующих свойствах этой величины. Пусть т и n — одно временно не равные нулю целые...

Разбить предложение на слова
Нужно разбить предложение на слова помоги те плз..

Матрицу смежности в матрицу инцидентности
Нужна помощь по теории Графов... Задание 1. Изучение способов представления графов с помощью матриц (лабораторная работа №2) 1. Напишите функцию, осуществляющую переход от представления графа с...

Найти произведение цифр заданного четырехзначного числа
Найти произведение цифр заданного четырехзначного числа и составить блок-схему Turbo Pascal

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

Определите, может ли шахматный король попасть с первой клетки на вторую за один ход
Поле шахматной доски определяется парой чисел (a, b), каждое от 1 до 8, первое число задает номер столбца, второе – номер строки. Заданы две клетки. Определите, может ли шахматный король попасть с...

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

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

Вывод в строку всех элементов массива.
Procedure vyvod; begin for i:=1 to n do write (a); end; Правильно? И как сделать чтоб пробелы были между ними?

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

Чем отличаются параметры переменных от параметров значений
????????????????

Вычислить сумму ряда чисел
Здравствуйте! Есть задача с циклом пока в паскале: Вычислить сумму ряда чисел 2+4+6+…+1000. Program sum; var a, s: integer; Begin writeln (‘ вычисление суммы ряда’); ...

Определить возраст человека
Дорогие форумчанины, выручайте. Завтра зачёт, готовлюсь, как проклятая и тут застреваю на задаче (причём последняя в списке =.=) Преподаватель намекал, что будет что-то похожее. А я уже полчаса...

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

Вывести на экран номер четверти координатной плоскости, которой принадлежит точка с координатами
Задача № 56 Дано двузначное число Определить : а) входной ли в него цифра 3; в) входит ли в него цифра а; №107. Вывести на экран номер четверти координатной плоскости, которой принадлежит...

Подсчитать количество отрицательных среди чисел а, b, с
39. Подсчитать количество отрицательных среди чисел а, b, с.

Вывод массива в строку
1. Ввод массива целых чисел. 2. Вывод массива в строку. 3. Найти минимальный элемент среди положительных элементов массива. Заменить все отрицательные элементы массива на этот минимальный элемент....

Как сравнить несколько значений ?
Как можно сравнить несколько значений так чтобы определить какое значение среди приведённых наибольшее , а какое наименьшее ? Пример : Под конец задания мне нужно сравнить a ,b и c , значения у...

str()
функция str() не работает: пишет что процедура с параметрами указанных типов не найдена procedure Add1(D,K:integer; var Kp:integer);{opis prozeduri} var...

Определить количество дней в данном месяце для не високосного года
Дан номер месяца — целое число в диапазоне 1–12 (1 — январь, 2—февраль и т.д.). Определить количество дней в этом месяце для не високосного года.

Вычислить сумму 1-1/2+1/3-...+(-1)^n+1*1/n.Условный оператор и операцию возведения в степень не использовать.
Братцы программу составте полностью:)

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

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

Вводится строка символов, подсчитать сколько в данной строке запятых и тире, стоящих рядом. Заменить их на **.
Задача № 1. Вводится строка символов, подсчитать сколько в данной строке запятых и тире, стоящих рядом. Заменить их на **. Задача № 2. Организовать программу, запрашивающую фамилии студентов и их...

Найти наибольший и наименьший элементы прямоугольной матрицы и поменять их местами
Помогите пожалуйста решить задачу: Найти наибольший и наименьший элементы прямоугольной матрицы и поменять их местами Добавлено через 57 минут Очень прошу помогите;)

Напишите функцию MinDigit (n:longint), MaxDigit (n:longint), определяющую наименьшую и наибольшую цифры данного числа
Добрый день, товарищи, что-то не получается с задачей разобраться! Вот условие: Дано натуральное число N. Напишите функцию int MinDigit (int n) (C/C++), function MinDigit (n:longint):integer...

Треугольник Паскаля
1)С клавиатуры вводится число n. Нужно вывести n строчек треугольника паскаля! n=5 1 11 121 1331 14641 2) Дана последовательность из n неотрецателдьных целых чисел! На каждом шаге эти числа...

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

Задать с помощью условного оператора следующие действия:
Задать с помощью условного оператора следующие действия: а) меньшее из двух значений переменных вещественного типа X и Y заменить нулем, а в случае равенства - заменить нулями оба; б) наибольшее...

Написать функцию возведения числа x в степень n
4. Написать функцию возведения числа x в степень n Прошу помощи по этим задачам,если кому не трудно)

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

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

Turbo Pascal для Windows 7 Максимальная(64х разрядная система)
Нужен Turbo Pascal 7.1,который запустится и будет нормально работать на Windows 7 Максимальная(64х разрядная система). Можете дать ссылку?

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

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

Проверьте, является ли двумерный массив симметричным относительно главной диагонали.
Задача №355. Симметрична ли матрица? Данные вводятся с клавиатуры Проверьте, является ли двумерный массив симметричным относительно главной диагонали. Главная диагональ — та, которая идёт из...

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

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

Вводится последоватльность из n целых чисел, найти максимальное среди них
Вводится последоватльность из n целых чисел, найти максимальное среди них

Трансформация данных типа record в файл и наоборот
я уже поднимал похожий вопрос, но так с этим пунктом из своей программы так и не справился. Ниже шапка программа для быстрого ознакомления uses crt, graphabc; Type anketa1=record fio:...

Как ввести числа в одну строку?
Был дан ответ в виде следующих строк: 8, 9, 10, 11, 13. Строку 12 пришлось добавить, но программа не сработала. Вот программа с вашими строками: 1. uses Crt; 2. Var a: Real; 3. ...

К какому типу данных можно отнести дробное число
К какому типу данных можно отнести дробное число? (Например: 1,5)

Работа с символами строки. Вывести на экран последний символ слова
5.1) Вводится слово. Вывести на экран его последний символ.

Переворот строки
Нужно написать рекурсивную подпрограмму переворота строки. Например: прога->агорп

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

покскажите хороший учебник по pascal
всем привет в этом году заканчиваю школу надо сдовать ЕГЭ по информатике учитель сказал чтоб за лето выучил хотябы теорию по паскалю подскажите какой учебник взять?

Дана строка S и символ C. Удвоить каждое вхождение символа C в строку S.
Дана строка S и символ C. Удвоить каждое вхождение символа C в строку S.

Написать программу по нахождению наибольшего из 3 чисел
Найти наибольшее из трех чисел x, y, z

Первая строка входного файла содержит целое число N(1<= N <= 1000).
Первая строка входного файла содержит целое число N(1<= N <= 1000). В следующей строке задаются N положительных чисел, каждое из которых меньше или равно 1000. Выведите сумму нечетных чисел среди...

Определите количество участников, а так же самих участников состязаний, которые разделили первое место
В метании молота состязается n спортcменов. Каждый из них сделал m бросков. Победитель определяется по лучшему результату. Определите количество участников, а так же самих участников состязаний,...

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

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

Как в Паскале делать цикл FOR с шагом, например, 3, 5
Для примера такая программа: uses Crt; var i: integer; begin ClrScr; foe i:= 1 to 15 do write(' ', i); readln end.

Гражданин 1 марта открыл счет
Задача на Цикл с условием: Гражданин 1 марта открыл счет в банке, вложив 1000 руб. Через каждый месяц размер вклада увеличивается на 2% от имеющейся суммы. Определить: а) прирост суммы вклада за...

Генератор случайных чисел без повторений
допустим у меня есть набор вопросов(в ввиде процедур).можно ли создать генератор их случайного выбора и вывода?

Изменить регистр символа
Измените регистр символа, если он был латинской буквой: сделайте его заглавным, если он был строчной буквой и наоборот. Для этого напишите отдельную функцию, меняющую регистр символа. Формат...

Составить таблицу значений функции y=5x-2 на отрезке [1;20] с шагом x=2.
Составьте таблицу значений функции y=5x-2 на отрезке с шагом x=2.

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

Задачи на Div, Mod
Всем привет, нам тут в лицее задали пару задач, ну как пару... 30 штук, осталось вот 3 решить, я немножко не понимаю как, если кому не сложно - помогите пожалуйста :) Электронные часы - 2...

Вычислить сумму четных чисел от 2 до 100
Задача№1 Вычислить сумму четных чисел от 2 до 100 Если можно можете полностью написать задачу...спасибо

Возведение отрицательного числа в степень n
Приветствую. Помогите разобраться -- надо возвести число -1 в степень n, как это сделать? Вариант записи exp(n*(ln(-1))) не верен и не работает.

Составить программу, реализующую эпизод сказки
Найти алгоритм решения задачи и реализовать его с помощью оператора ( операторов ) if ( then else ). Составить программу, реализующую эпизод сказки: машина спрашивает, куда пойдет герой, и в...

Вывести все целые числа от А до В включительно
1)Даны целые положительные числа А и В (А<В). Вывести все целые числа от А до В включительно; при этом каждое число должно ывыодится столько раз, какого его значения (например , число 2 выводится 2...

Паскаль(программа реализующая треугольник паскаля)
помогите пожалуста. нужно написать программу реализующую треугольник паскаля 1 1 1 1 2 1 1 3 3 1 1 4 6 4 1 1 5 10 10 5 1 1 6 15 20 15 6 1 - при условии что значение R и N вводяться из...

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

Определить правильность даты,введенной с клавиатуры
помогите пожалуйста решить данную задачу.ОООчень срочно!!!Послезавтра сдавать!!:help: (Определить правильность даты,введенной с клавиатуры (число-от 1 до 31, месяц-от 1 до 12).Если введены...

Вычислить S=1*2+2*3*4+...n*(n+1)...2n
Помогите пожалуйста решить. Дано натуральное число n. Вычислить S=1*2+2*3*4+...n*(n+1)...2n Заранее всем спасибо.

Ошибка: неверное количество фактических параметров
Я не пойму что здесь не так! в 42 строчке эта самая ошибка! program proga; const m=8; n=10; f=15; type raz=1..f; mas=array of real; var x,y,z,w:mas; kx,ky,kz,kw:real; i:integer; function...

Вычислить значение выражения
В паскаль вычислить значение выражения y=15x^2+8x-9

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

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

Составить блок схему площади квадрата
Помогите составить блок схему площади квадрата 3) Текст программы Program Ploshad_KBADPATA; var a, s: real; begin write(BBEDuTE CTOPOHY KBADPATA: '); readln(a); s:=a*a;

В каком из условных операторов допущена синтаксическая ошибка
В каком из условных операторов допущена синтаксическая ошибка: A) if B=0 then (‘Деление на ноль невозможно’); B) if A>B then max:= A else max:=B; C) if(A>B) and...

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

Чему будет равна переменная sum после выполнения фрагмента программы
2)Чему будет равна переменная sum после выполнения фрагмента программы: sum:=0; for i:=5 to 8 do sum:= sum+i;

Составить программу перевода футов в метры (1 фут равен 0,3048 м) (счетчик цикла меняется от 1 до 30).
Что я застрял на этих циклах, не знаю в чем причина, но выдает ошибку Вот что я написал,- Помогите пожалуйста довести дело до ума! program Project2; {$APPTYPE CONSOLE} var f,m,r:real; ...

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

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

Дана матрица размера M × N. Для каждой строки матрицы найти сумму ее элементов.
решите пажалуста

По введенному номеру дня недели вывести название дня и определить, является день рабочим
Добрый вечер, нужна ваша помощь. (сам noob, Паскаль недавно начал учить) 1. В общем, есть задача "По введенному номеру дня недели вывести название дня и определить, является этот день рабочим...

Проверить, является ли число степенью двойки
Нужно сделать небольшую программу, которая будет проверять, является ли число степенью двойки, то есть, 16-является степенью двойки (2^4=16), а 18 не является, но нужно сделать, как можно проще!

Вопросы по паскалю
Народ помогите найти ответы на все вопросы..очень нужно!!! 1. Каким ключевым словом описываются переменные, содержащие символьные строки? 2. Какая операция реализует логическую операцию «ИЛИ»?...

Дан массив чисел.Найти,сколько в нем пар одинаковых соседних элементов
8.34 Дан массив чисел.Найти,сколько в нем пар одинаковых соседних элементов.

В записке слова зашифрованы - каждое из них записано наоборот. Расшифровать сообщение
В записке слова зашифрованы-каждое из них записано наоборот.Расшифровать сообщение есть вот такие наброски function invert(s : String) : String; var Res : String; i,k : Byte; begin Res...

Найти количество делителей числа. Сколько из них четных
Найти кол-во делителей натурального числа.Сколько из них четных? Помогите,пожалуйста.Я буду очень благодарна!

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

Дано ребро куба. Найти объем куба и площадь его боковой поверхности
4. Дано ребро куба. Найти объем куба и площадь его боковой поверхности. ПОМОГИТЕ ПОЖАЛУЙСТА.

Как из программы на паскале сделать exe файл?
Как из программы на паскале сделать exe файл?

Как Нарисовать гриб в ПАСКАЛЬ
Чет я рисую не то видать Uses Graph; Var grDriver : Integer; grMode : Integer; ErrCode : Integer; Begin grDriver:=Detect; InitGraph(grDriver, grMode, 'E:\PAS\PASCAL\BIN');

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

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

Вывести слова в алфавитном порядке
Дана строка, состоящая из русских слов, разделенных пробелами (одним или несколькими). Вывести строку, содержащую эти же слова (разделенные одним пробелом), но расположенные в алфавитном порядке.

Загадать пользователю загадку и проверить ответ
помогите сделать программу "Загадки" на паскале!нужно чтобы выводилась загадка,пишеш ответ выводится угадал или нет!или может у когонить есть чтонибудь подобное!помогите чем можете! спасибо

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

Вывести квадраты и кубы целых чисел от 8 до 1 (в обратном порядке)
Составить схему алгоритма и программу на языке Паскаль для вывода на экран квадраты и кубы целых чисел от 8 до 1 (в обратном порядке).

Четные элементы массива увеличить в 2 раза, а нечетные увеличит в 3 раза
Задан массив A(n) n=9.четные элементы массива увеличить в 2 раза, а нечетные увеличит в 3 раза. Вывести на экран преобразованный массив. Задача должна быть так выходить на экране компа: ...

Из произвольно введёной строки, удалить все гласные буквы
Помогите решить программу(просто не был на той теме). 1)-Из произвольно введёной строки, удалить все гласные буквы- 2)-Дана строка,удалить из нее все буквы -А- и в конце каждого слова добавить...

C клавиатуры вводятся числа, пока не будет введено отрицательное число. Посчитать их количество
Помогите,пожалуйста, разобраться) C клавиатуры вводятся числа, пока не будет введено отрицательное число. Посчитать их количество. Решить задачу while-repeat

Графика. Построить домик.
Построить домик. Я знаю что это простая задача, просто мы еще не проходили графику

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

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

Вычислить N! N вводится с клавиатуры
21. Вычислить N! N вводится с клавиатуры.

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

У вас есть 100р, вам нужно купить 100 голов скота Программа определяет сколько купить быков, коров и телят
2) У вас есть 100р, вам нужно купить 100 голов скота. Бык-10р, корова-5р, теленок-50 коп. Нельзя купить только быков, или только коров. Программа определяет сколько купить быков, коров и...

Составить программу, определяющую, пройдет ли график функции y=ax^2+bx+c через заданную точку с координатами n, m.
Составить программу, определяющую, пройдет ли график функции y=ax^2+bx+c через заданную точку с координатами n, m.

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

Решение СЛАУ методом простой итерации или методом Зейделя
Решение СЛАУ методом простоой интерпритации или методом Зейделя. Напишете пожалуйста пример решения

Метод итераций Якоби и метод Гаусса-Зейделя
Подскажите что-нибудь,вот у мну лабораторная: РЕШЕНИЕ СИСТЕМ ЛИНЕЙНЫХ И НЕЛИНЕЙНЫХ УРАВНЕНИЙ 1. Цель работы Ознакомление с численными методами решения систем линейных и нелинейных уравнений. ...

Даны произвольные числа a, b, c. Определить тип треугольника с данными сторонами
Даны произвольные числа a, b, c. Если нельзя построить треугольник с такими длинами сторон, то напечатать 0. Иначе напечатать 3, 2 или 1 в зависимости от того, равносторонний это треугольник,...

Вычисление площади треугольника по основанию и высоте
Так получилось,что я проболел тему паскаль,а работы нужно обязательно сдать,помогите мне плиз. ВАРИАНТ 1 1. Составьте блок-схему алгоритма и программу вычисления площади треугольника по основанию...

Определить, сколько раз среди последовательности целых чисел встречается максимальное и минимальное
Даны целые числа s1,s2...sn. Определить: а) Сколько раз среди них встречается максимальное. б) Сколько раз среди них встречается минимальное.

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

Определить возраст человека в годах
Дано натуральное число n (n≤100), определяющее возраст человека (в годах). Дать для этого числа наименования «год», «года», «лет». Например, 1 год, 23 года, 46 лет и т.д.

Определите, является ли строка палиндромом
Дана строка S. Определите, является ли она палиндромом. Палиндромом называются строки, которые одинаково читаются как слева-направо, так и справа-налево. Пример S = 'asdfgfdsa' Результат:...

Напишите программу,которая выводит минимальный элемент введенного с клавиатуры массива целых чисел
Введите в одной строке элементы массива (5 целых чисел) и нажмите <Enter> -> 23 0 45 -5 12 Минимальный элемент массива: -12 Помогиет написать эту программу,для зачёта!!! Буду благодарен!!!

Дана непустая последовательность целых чисел, оканчивающихся 0. Найти:
Дана непустая последовательность целых чисел, оканчивающихся 0. Найти: 1. сумму всех чисел последовательности, больших числа x; 2. количество всех четных чисел последовательности

Шифр Виженера (готовое решение)
Решил выложить свои труды, может кому и пригодятся... А то нас в МАИ препод просто душил этими лабами... Шифр Виженера. Код программы. program Shifr_Vizhenera; uses crt; const n=32;

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

Даны два целых числа. Составить программу, которая большее число возводит в квадрат, а меньшее увеличивает на 10
Написать программу для решения задачи: Даны два целых числа. Составить программу, которая большее число возводит в квадрат, а меньшее увеличивает на 10. Если числа равны, то вывести сообщение «ЧИСЛА...

Определить значение угла для минутной стрелки
Часовая стрелка образует угол φ с лучом, проходящим через центр и через точку,соответствующую 12 часам на циферблате,0 < φ ≤ 2π . Определить значение угла для минутной стрелки, а...

Программа для перевода чисел из одной системы счисления в другую
uses crt; var cs1,cs2,res,change:integer; TD:string; {функция перевода Dec числа в любую сс} function FromDec(n,r:longint):string; var s:String; const

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

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

Поменять местами максимальный и минимальный элементы массива
задание:в одномерном массиве поменять местами максимальный и минимальный элементы.основываясь на эту программу. program lab3; var x,s :real; n,i:integer; begin write ('x='); readln(x);...

Вычислить сумму чисел, кратных 3 из интервала [3,60]
Вычислить сумму чисел, кратных 3 из интервала : S = 3 +6 +9 + ... +60.

Найти сумму всех положительных чисел вводимых с клавиатуры. Если 0, то вывод на печать.
"Найти сумму всех положительных чисел вводимых с клавиатуры. Если 0, то вывод на печать". Задали 6 задач - 4 решил, 5ую разберу, а вот это вообще никак. Помогите, уже голова совсем не варит..

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

В массиве заменить четные числа на 0, нечетные на -1
Дан массив из N элементов.В нем четные числа заменить на 0,а не четные на -1

Реализовать секундомер
Пожалуйста помогите написать программу, которая выводит на экран секундомер(электронный т.е 00:00, 00:01 и т.д). Заранее Спасибо!

Присвоить целой переменной h третью от конца цифру в записи целого положительного числа k
1. Присвоить целой переменной h третью от конца цифру в записи целого положительного числа k (например: k=130985, то h=9). 2.Написать программу, в результате выполнения которой булевская переменная...

Написать программу определения сколько бактерий будет через N минут
Все здрасте, помогите написать программу ! (Осталось всего 3 программы написать эти самые сложные оказались) Решение задач в 3 видах(циклах): с For, While, Repeat Каждая бактерия делится на две...

Удалить из массива первый отрицательный элемент, если таковой имеется.
Создать одномерный массив, состоящий из 5-ти элементов, вводимых с клавиатуры. Удалить из массива первый отрицательный элемент, если таковой имеется. Первую часть понял: program z; var...

Апостроф в строке
Подскажите пожалуйста!=) как в паскале использовать символ '? В строках пример: "эх..... была не была ='-(" Мне нужно узнать сколько раз встречается в тексте этот символ.

Выполнить над числами указанное цифрой действие и вывести результат
арифметические действия над числами пронумерованы следующим образом: 1 - сложение, 2 - вычитание, 3 - умножение, 4 - деление. Дан номер действия и два числа A и B (В не равно нулю). Выполнить над...

Запятая после целого числа
Хочу что бы в ответе, после запятой было лишь два знака, как это можно сделать? Вот листинг программы: Program Kurs_var13_1; var a,b,x : real; function CheckZero(v:real):real; begin...

Алгоритм перебора всех сочетаний
Помогите. Необходимо перебрать все сочетания из N предметов по K. В моей задаче N вводится, а K = 3 постоянно. То есть немного упрощается. Нужен алгоритм перебора всех сочетаний из N предметов по 3....

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

Что такое процедура val
Что за процедура, можно на примере Спасибо!

Найти все числа Армстронга от 1 до k
Помогите пожалуйста решить задачу Натуральное число, в записи которого n цифр, называется числом Амстронга, если сумма его цифр, возведенная в степень n, равна самому числу. Найти все числа...

Составить программу, проверяющую, принадлежит ли число, введенное с клавиатуры, интервалу (1; 5).
1.Составить программу, проверяющую, принадлежит ли число, введенное с клавиатуры, интервалу (1; 5). по правилам форума - одна тема - одна задача. Добавлено через 43 минуты 1.Составить...

Принадлежит ли число, введенное с клавиатуры, интервалу (1; 5).
Составить программу, проверяющую, принадлежит ли число, введенное с клавиатуры, интервалу (1; 5).

Найти синус и косинус числа
Короче задача такая: нужно ввести число и найти синус и косинус, но вводить надо в градусах, что-то я не допру никак :) помогите, заранее спасибо! Вот задача: program xxx; var a,b,c,d:real;...

Знак возведения в степень
Возведение числа в степень в Basicax выполняется с помощью знака возведения в степень (^). Например: N = a ^ 7. А в Паскале такого знака нет; получается, что надо 7 раз перемножить a...

Дан массив целых чисел. Все элементы, кратные числу 10 заменить нулём
Задача №1 Дан массив из 20-ти элементов. Сформировать два массива размером 10, включив в первый из них элементы заданного массива с чётными индексами, а во второй с нечетными. Задача №2 Дан...

Составить подпрограмму для вычисления определенного интеграла методом трапеций
Здравствуйте! Помогите пожалуйста разобраться с сиим: 1) Составить подпрограмму для вычисления определенного интеграла методом трапеций Заранее спасибо!)

Программа на паскале - Найдите сумму натуральных чисел от 1 до 1000, которые делятся без остатка на 7 и не делятся без остатка на 13
Требовалось решить задачу по математике: Найдите сумму натуральных чисел от 1 до 1000, которые делятся без остатка на 7 и не делятся без остатка на 13. Я написала программу в Pascal ABC и получила...

Написать программу, выводящую все делители заданного целого числа
Выручите решите эти задачи 1 надо решить 2-мя способами с пред условием и пост условием!а 2-я на процедуры !Заранее спасибо! Цикл с неизвестным числом повторений. ( Решить...

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

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

Найти произведение ненулевых элементов в одномерном массиве
помогите составить вот эти простенькие задачки.. срочно надо, контрольная "на носу"!! Вариант№1. 1.Найти произведение ненулевых элементов в одномерном массиве размера N. 2.Найти в одномерном...

Проверить истинность высказывания: "Данные числа x, y являются координатами точки, лежащей в первой или третьей координатной четверти".
Задача №1. Проверить истинность высказывания: "Данные числа x, y являются координатами точки, лежащей в первой или третьей координатной четверти". Задача №2. Даны координаты (как целые от 1 до...

Определить разность наибольшего и наименьшего элементов в одномерном массиве A
Задача: Определить разность наибольшего и наименьшего элементов в одномерном массиве A.

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

Найти сумму элементов массива, которые кратны данному К
1. В массив A занесены натуральные числа. Найти сумму тех элементов, которые кратны данному К. Блок схема

Найти объём шара и площадь полной поверхности шара
Дан радиус шара. Найти объём шара и площадь полной поверхности шара. решите пожалуйста без всяких процедур,и всякого такого безобразия))))заранее спасибо

В массиве найти минимальный элемент и его индекс
составить программу вычисления в массиве B(N) минимального среди положительных элементов и его номера Добавлено через 29 минут пожалуйста!!!!!

Где можно скачать Turbo Pascal для Windows7 64 bit?
раз 10 скачивала и все 32 битные.

Нормальный пульс человека 60 ударов в минуту, давление 120 на 80. Определить, пройдет ли медкомиссию данный претендент
22. Нормальный пульс человека 60 ударов в минуту, давление 120 на 80. При отборе в школу космонавтов допуск по пульсу равен –1, +3; допуск по нижнему значению давления 3, по верхнему - +5....

Напечатать числа в виде следующей таблицы
11111 1111 111 11 1

Ввод значений массива с клавиатуры построчно
Начал делать задачу, надо для начала ввести 2 массива, начал писать ввод первого массива и получилось не очень красиво. Хочу чтобы ввод осуществлялся построчно т.е.: a a a a a a. А получается вот...

Дана последовательность действительных чисел а1, а2,..., аn. Выяснить, будет ли она возрастающей
4. Дана последовательность действительных чисел а1, а2,..., аn. Выяснить, будет ли она возрастающей.

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

Количество знаков после точки
Как определить количество знаков после точки в числе с плавающей точкой? P.S. Прошу прощения за то, что подобные темы уже были.

Сумма нечетных чисел
4. Напишите программу, определяющую сумму всех нечетных чисел от 1 до 99

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

Факториал 100
помогите пжл решить задачу))) составить программу для вычисления 100!

Составьте программу, которая меняет местами первое и последнее слово в строке
Составьте программу, которая меняет местами первое и последнее слово в строке: а) в строке "Минск столица Беларуси" б) в строке "Беларусь ты моя синеокая"

Сложение длинных чисел
Помогите срочно! Нужно составить программу, суммирующую два натуральных n-значных числа ,где n>20. Думал такprogram lab15; uses crt; var n,n1:byte; sum,y,err:integer; function...

Наберите программу, которая выводит на экран текст.
дано задание : 3. Наберите программу, которая выводит на экран текст: Лабораторная работа №10 студентки гр. ЭФ-92 Пановой Елены 4. Подключите модуль...

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

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

Вычислить значение выражения по формуле (все переменные принимают действительные значения)
Cos x/p-2x+16xcos(xy)-2

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

Определите результат работы функции входном значении, равном 123456
Определите результат работы функции входном значении, равном 123456: function qq(x: integer):integer; var i, s: integer; begin s:=0; while x > 0 do begin s:= 10*s + x mod 10; x:= x div 10;...

Вывести на экран квадраты и кубы нечетных целых чисел от 1 до 9
Вывести на экран квадраты и кубы нечетных целых чисел от 1 до 9. Срочно

Введите номер дня недели. Выведите на экран название дня
Введите номер дня недели. Выведите на экран название дня.