Статистика
Форма входа
Полезные ссылки
Учебный центр, e-mail:
l3-inf0@yandex.ru
Слушать Радио Дача онлайн
Архив записей
Окажем помощь в решении контрольных, написании курсовых и дипломных
работ в Волгограде и Волжском.
Тел. 8-917-647-63-01 Учебный центр Гений
l3-info@yandex.ru
|
|
---|---|
Вычисление значения функции | Требуется написать программу, вычисляющую значение какой-нибудь функции (у = f(x)). Допустим, такой... |
Найти максимальное число из трех | Определить какое из трех, введенных пользователем, чисел максимальное и вывести его на экран. |
Оператор case в задаче выбора | Бывает, что вместо оператора if удобнее использовать оператор case. Обычно это случается, если... |
Определение четверти на координатной плоскости | Всем известна прямоугольная (декартова) система координат, в которой две перпендикулярные оси делят... |
Определить возможность существования треугольника по сторонам | Треугольник существует только тогда, когда сумма любых двух его сторон больше третьей. Дано: a, b... |
Вычисление суммы ряда чисел | Вычислить сумму ряда чисел 1/12 + 1/22 + 1/32 + … + 1/n2, где n определяется пользователем. |
Таблица умножения на Паскале | Достаточно часто требуется построить на экране какую-нибудь двумерную таблицу. Это можно... |
Возведение числа в степень |
|
Обмен значений переменных |
|
Псевдослучайные числа. Функция, возвращающая значение и меняющая параметр |
|
Сумма и произведение элементов одномерного массива | Задачи данного типа являются достаточно простыми и сводятся к поэлементному перебору массива и... |
Запись в типизированный и текстовый файлы | Осуществить запись одинаковых данных в типизированные и текстовый файлы. Сравнить размер файлов. |
Копирование текстовых файлов |
|
Числа Фибоначчи | Вывести на экран ряд чисел Фибоначчи, состоящий из n элементов. Числа Фибоначчи – это элементы... |
Определение длины строки | Определить длину строки, введенной пользователем. |
Копирование части строки | Скопировать часть строки с определенной позиции и определенной длины в другую строку. |
Удаление подстроки | Удалить из строки ее часть с заданной позиции и заданной длины. |
Вставка подстроки | Вставить в заданную позицию строки другую строку. |
Замена подстроки в строке | Найти в строке определенную последовательность символов и заменить ее другой. |
Переворот строки | Перевернуть строку, т.е. последние символы должны стать первыми, а первые последними. |
Палиндром | Определить, является ли строка палиндромом. Палиндром – это число, слово или фраза, одинаково... |
Частота встречаемости символа в строке | Определить, как часто встречается определенный символ в строке. |
Удаление одинаковых символов | Оставить в строке только один экземпляр каждого встречающегося символа. |
Вывод квадратов натуральных чисел | Вывести все квадраты натуральных чисел, не превосходящие данного числа N. Пример: N=50 | 1 4 9 16... |
Как избавиться от goto |
|
Окна в crt. Программа для угадывания числа | Используя возможности модуля crt, оформить выводимую на экран информацию. |
Сумма и произведение цифр числа | Дано число. Найти сумму и произведение его цифр. |
Масштабирование фигуры | Изменить размер геометрической фигуры. |
Фильтрация записей по значению поля | Вывести на экран фамилии студентов, чей балл выше среднего по группе. |
Пример использования записи с вариантами | Создать каталог из журнал и статей. Выдавать информацию о публикациях, удовлетворяющих тому или... |
Извлечение цифр числа | Определить из каких цифр состоит число |
Проверка кратности числа | Определить, кратно ли заданное число трем; если нет, вывести остаток. |
Сумма элементов различных рядов | Задача 1. Найти сумму n-го количества элементов ряда 1, -0.5, 0.25, -0.125, … Задача 2. Найти сумму... |
Определить количество простых чисел | Вводятся целые числа до первого числа, которое меньше двух. Определить, сколько простых чисел было... |
Использование константы PI | Найти длину и площадь окружности, используя встроенную в язык программирования Pascal константу PI. |
Пример форматированного вывода вещественных чисел | Вывести на экран действительное число в различных форматах представления. |
Пример простейшего ввода и вывода данных | Получить от пользователя данные, обработать их и вывести на экран |
Пример форматированного вывода невещественных типов | Вывести на экран введенные пользователем данные в полях шириной, заданной по умолчанию, и полях... |
Вычисление факториала числа | Факториал числа представляет собой произведение всех натуральных чисел от 1 до этого числа... |
Обмен значений переменных | Обменять значения двух переменных, используя третью (буферную) переменную. |
Добавление правильного окончания (слова) к числу | В русском языке, когда говорят о количестве лет, то после числа используют слова "год", "года" и "... |
Кубы чисел от A до B | Вывести на экран кубы чисел от A до B. |
Сумма элементов частей массива | Какая сумма элементов массива больше – с первого до элемента с номером К или от элемента с номером... |
Среднее арифметическое всех чётных элементов массива, стоящих на нечётных местах | Получить среднее арифметическое всех чётных элементов массива, стоящих на нечётных местах. |
Сколько раз в матрице встречается заданное число | В двумерном массиве целых чисел определить, сколько раз в нем встречается элемент со значением X. |
Максимальный по модулю элемент массива | В однородном массиве, состоящем из N вещественных элементов, найти максимальный по модулю элемент... |
|
|
---|---|
Программа "Угадай число" | Отгадать целое число, которое "загадал" компьютер в определенном диапазоне. |
Вычисление площади поверхности цилиндра | Допустим, организации часто требуется красить баки цилиндрической формы. При этом они красят только... |
Вывод на экран таблицы ASCII | ASCII – код для обмена информацией. В настоящее время чаще используется 8-битный вариант (под... |
Заполнение массива и вычисление суммы элементов | Требуется заполнить массив числами, которые вводит пользователь, и вычислить их сумму. Если... |
Функции вычисления площади геометрических фигур |
|
Функция, вычисляющая наибольший общий делитель |
|
Процедура вычисления корней квадратного уравнения |
|
Рекурсия. Процедура перевода чисел из десятичной системы счисления в другие |
|
Заполнение массива и его вывод на экран | В задачах по программированию очень часто встречается необходимость заполнить массив данными и... |
Поиск максимального элемента в массиве | Найти максимальный элемент численного массива. |
Сумма элементов двумерного массива |
|
Вставка элемента в массив | Требуется добавить элемент в какое-нибудь место массива. |
Выбор элементов массива | Требуется из одного массива скопировать в другой массив значения, удовлетворяющие определенным... |
Удаление элементов одномерного массива | Допустим, имеется одномерный массив, содержащий числа от 0 до 49 включительно. Требуется исключить... |
Умножение матриц | Три продавца продают четыре вида товаров. Количество продаваемого товара сведено в таблицу A. |
Поиск максимального элемента среди минимальных элементов столбцов | Дано: целочисленная матрица из n строк и m столбцов. Найти: максимум из наименьших элементов... |
Фильтрация данных | Скопировать из одного файла в другой только определенные символы (например, ряд гласных) и... |
Копирование данных в обратном порядке | Требуется скопировать данные из одного файла в другой, но в обратном порядке. |
Запись табличных данных в файл и их чтение оттуда |
|
Программа, определяющая количество дней в месяце |
|
Преобразование даты в числовой формат | Условие и цель задачи. Пользователь вводит дату в формате ‘dd.mm.yyyy’, которая присваивается... |
Перевод двоичного числа в десятичное | Двоичное число, введенное пользователем программы, преобразовать в десятичное число. Результат... |
Перевод десятичного числа в двоичную или восьмеричную систему счисления. | Написать программу, которая переводит число из десятичной системы счисления в двоичную или... |
Перевод десятичного числа в шестнадцатеричное | Пользователь вводит число, представленное в десятичной системе счисления. Программа должна... |
Перевод шестнадцатеричного числа в десятичное число | Число представленное в шестнадцатеричной системе счисления перевести в десятичную систему счисления. |
Замена последовательности символов в строке | Найти в строке все заданные последовательности символов и заменить их другой последовательностью. |
Проверка файла с данными на наличие записи | В текстовом файле содержатся сведения о количестве учащихся в классах и их классных руководителях.... |
Вывод строки по диагонали | Вывести на экране строку, введенную пользователем, по диагонали. |
Добавление пробелов в строку | Добавить в строку пробелы после знаков препинания, если они там отсутствуют. |
Удаление последнего слова в строке | Требуется в произвольной строке удалить последнее слово, т.е. все символы после последнего пробела... |
Перенос и анимация геометрических фигур | Описать на языке программирования Pascal с помощью модуля graph алгоритм переноса и анимации... |
Использование повторяющихся изображений для создания орнаментов | Получить изображение, состоящее из одной повторяющейся геометрической фигуры. |
Сортировка данных строки | Дана строка, состоящая из слов и чисел, отделенных друг от друга пробелами. Сформировать три строки... |
Использование перечисления | Определить среднюю зарплату за первое полугодие и среднюю зарплату за год. |
Определение различных цифр, входящих в число | Какие различные цифры входят в целое число. |
Поменять слова местами | Поменять местами слова в строках, состоящих из двух слов. |
Определить количество элементов массива, значение которых больше соседних элементов | Пользователь вводит n элементов массива. Требуется определить количество элементов, значение... |
Подсчет количества слов в строке | Подсчитать количество слов во введенной пользователем строке. Для упращения задачи считаем, что... |
Сумма элементов побочной диагонали | В двумерном массиве случайных чисел [1..10,1..10] вычислить сумму элементов побочной диагонали. (... |
Оценка последовательности | Пользователь вводит десять целых чисел представляющих собой последовательность. Требуется ее... |
Подсчет количества символов, строк и слов в текстовом файле | Посчитать сколько содержится в файле символов, строк и слов. Разделителями слов считать пробелы и... |
Доказательство гипотезы Сиракуза | Возьмем любое натуральное число. Если оно четное - разделим его пополам, если нечетное - умножим на... |
Решение системы уравнений | Требуется определить, сколько можно преобрести ручек (по цене 10 руб.), карандашей (5 руб.) и... |
Проверка корректности строки-идентификатора | Проверить введенную пользователем строку на наличие недопустимых символов. В качестве первого... |
Определить угаданные и неугаданные числа | Компьютер генерирует пять чисел в диапазоне от 1 до 15 включительно. Человек пытается их угадать.... |
Упорядочить первые и последние элементы массива | Дан массив из 10 элеменов. Первые 4 упорядочить по возрастанию, последние 4 по убыванию. |
|
|
---|---|
Вычисление площадей геометрических фигур | Пример программы, позволяющей вычислять площади трех геометрических фигур: прямоугольника,... |
Перевод римских чисел в арабские. Пример автоматного распознавателя | Можно использовать вложенные операторы case. Это удобно, например, при реализации автоматных... |
"Заем". Арифметические выражения, возведение в степень |
|
Фильтр строки | Программа выделяет из строки (введенной пользователем) числа (только целые) и помещает их в массив... |
Нахождение НОД (наибольшего общего делителя) с помощью рекурсивной функции |
|
Программа решения задачи о ханойской башне |
|
Исключение одинаковых элементов массива | Допустим, у нас есть массив, содержащий различные численные значения. Требуется исключить из него... |
Сортировка методом пузырька | При работе с массивами данных не редко возникает задача их сортировки по возрастанию или убыванию,... |
Лабораторная работа №2
Проверить на неотрицательность значение выражения
sin(tg(2π x / k )).
Если выражение неотрицательно, то значение k утроить.
Тестовый пример: x=1 k=1 k=1
x=-1 k=1 k=3
входные данные: x,k
выходные данные: k
Решение
Program Lab_2;
Var x,k,y:Real;
Begin
Write('x='); ReadLn(x);
Write('k='); ReadLn(k);
y:=sin(sin(2*pi*x/k)/ cos(2*pi*x/k));
if y>=0
Then
begin
k:=3*k;
Writeln('Значение k утроено k=' ,K)
end
Else
Writeln('Значение k не изменилось, k=' ,K) ;
ReadLn
End.
Лабораторная
работа №1
Входные данные: А, В
Выходные данные: Z
Program lab_1;
Var A,B,Z, p: real;
Begin
Write('A='); ReadLn(A);
Write('B='); ReadLn(B);
P:=(sqrt(abs(A)+sqr(A+B))/(A*B);
Z:=B*(sin(p)/cos(p)+exp(p));
Writeln(' Z =', Z);
Readln;
End.