
- •Часть 1
- •Содержание
- •Введение
- •Интегрированная среда разработки
- •Задания для выполнения
- •Линейные алгоритмы
- •Задания для выполнения
- •Дополнительные задания
- •Нелинейные алгоритмы. Ветвление
- •Задания для выполнения
- •If t then writeln(‘Кирпич пройдет’)
- •Нелинейные алгоритмы. Циклы
- •Задания для выполнения
- •Массивы
- •Задания для выполнения
- •Библиография
Задания для выполнения
Пример 4. Даны действительные числа a, b, c, x, y. Выяснить, пройдет ли кирпич с ребрами a, b, c в прямоугольное отверстие со сторонами x и y. Просовывать кирпич в отверстие разрешается только так, чтобы каждое из его ребер было параллельно или перпендикулярно каждой из сторон отверстия.
Решение. Из условия ясно, сколько переменных – не менее пяти: a, b, c, x, y. Тип их – вещественный.
Самое главное в задаче – продумать условие, с помощью которого можно доказать возможность прохождения кирпича в отверстие. Так как кирпич просовывается так, чтобы каждое из его ребер было параллельно или перпендикулярно каждой из сторон отверстия, то пара значений x и y должна совпадать хотя бы с одной из пар, выбранных из тройки a, b, c. Причем надо учесть то, что x и y могут совпасть, соответственно, например, с a и b, но не совпасть с b и a, то есть, нужно учитывать порядок в парах. Из последнего следует, что совпадение x и y с первой из пар нужно записывать так:
((x=a)and(y=b))or((x=b)and(y=a)).
Так как пар три – a и b, a и c, b и c, и достаточно хотя бы одного совпадения (следовательно, нужен оператор or), то полный вид проверяемого выражения суть:
(((x=a)and(y=b))or((x=b)and(y=a))) or
(((x=a)and(y=c))or((x=c)and(y=a))) or
(((x=b)and(y=c))or((x=c)and(y=b)))
Мы имеем право даже вычислить это выражение и присвоить его в какую-нибудь логическую переменную t, а затем использовать ее в операторах if или case. Теперь можно считать, что задача практически решена. Основной оператор (или пара операторов) может выглядеть так:
if
(((x=a)and(y=b))or((x=b)and(y=a))) or
(((x=a)and(y=c))or((x=c)and(y=a))) or
(((x=b)and(y=c))or((x=c)and(y=b)))
then
writeln(‘Кирпич пройдет’)
else
writeln(‘Кирпич не пройдет’);
или, используя переменную t:
t:=(((x=a)and(y=b))or((x=b)and(y=a))) or
(((x=a)and(y=c))or((x=c)and(y=a))) or
(((x=b)and(y=c))or((x=c)and(y=b)));
if
t
then
writeln(‘Кирпич пройдет’)
else
writeln(‘Кирпич не пройдет’);
Используя оператор case (нужно учесть, что t может принять только два значения: True или False):
t:=(((x=a)and(y=b))or((x=b)and(y=a))) or
(((x=a)and(y=c))or((x=c)and(y=a))) or
(((x=b)and(y=c))or((x=c)and(y=b)));
case t of
true: writeln(‘Кирпич пройдет’);
false: writeln(‘Кирпич не пройдет’);
end;
Блок-схема:
Рис. 8. Блок-схема к примеру 3
Текст программы с использованием оператора If (он выделен):
var a,b,c,x,y: real;
t: boolean;
begin
WriteLn(‘Введите линейные размеры кирпича a, b, c и отверстия x, y:’);
ReadLn(a,b,c,x,y);
t:=(((x=a)and(y=b))or((x=b)and(y=a))) or
(((x=a)and(y=c))or((x=c)and(y=a))) or
(((x=b)and(y=c))or((x=c)and(y=b)));
If t then writeln(‘Кирпич пройдет’)
else writeln(‘Кирпич не пройдет’);
WriteLn(‘Готово. Нажмите Enter…’);
ReadLn;
End.
Текст программы с использованием оператора Case (он выделен):
var a,b,c,x,y: real;
t: boolean;
begin
WriteLn(‘Введите линейные размеры кирпича a, b, c и отверстия x, y:’);
ReadLn(a,b,c,x,y);
t:=(((x=a)and(y=b))or((x=b)and(y=a))) or
(((x=a)and(y=c))or((x=c)and(y=a))) or
(((x=b)and(y=c))or((x=c)and(y=b)));
case t of
true: writeln(‘Кирпич пройдет’);
false: writeln(‘Кирпич не пройдет’);
end;
WriteLn(‘Готово. Нажмите Enter…’);
ReadLn;
end.
Пример 5. Классическая задача. Из двух данных чисел найти наибольшее и наименьшее.
Решение. Приведем сразу текст программы. Разберитесь в нем самостоятельно. Условный оператор выделен.
var x,y,max,min: real;
begin
WriteLn(‘Введите числа x, y:’);
ReadLn(x,y);
if x>=y then
begin
max:=x;
min:=y;
end
else
begin
max:=y;
min:=x;
end;
WriteLn(‘Максимум равен ’,max:10:5);
WriteLn(‘Минимум равен ’,min:10:5);
WriteLn(‘Готово. Нажмите Enter…’);
ReadLn;
end.
Пример 6. Вычислить значение функции:
Решение.
Приведем сразу текст программы.
Разберитесь в нем самостоятельно.
Обратите внимание, как записаны степени
и
.
Метод построения степени приведен в
примере 1 Части 2.
var x,y,f: real;
begin
WriteLn(‘Введите числа x, y:’);
ReadLn(x,y);
if x<y then f:=cos(exp(y*ln(abs(x)))) else
{здесь производится анализ x и y,}
if x=y then f:=0 else {причем заметьте, что условие x>y}
f:= cos(exp(x*ln(abs(y)))); {явно не записывается, ведь
ясно, что если учтены случаи
x<y и x=y, то остался лишь
x>y}
WriteLn(‘Значение функции: ’,f:10:9);
WriteLn(‘Готово. Нажмите Enter…’);
ReadLn;
end.
Пример 7. (На использование оператора case). В старояпонском календаре был принят 12-летний цикл. Годы внутри цикла носили названия животных: крысы, быка, тигра, кролика, дракона, змеи, лошади, овцы, обезьяны, курицы, собаки, кабана. Написать программу, которая по номеру некоторого года печатает его название по старояпонскому календарю. (Справка: 1996 г. — год крысы — начало очередного цикла.)
Решение. Самым главным является ответ на вопрос – как вычислять порядковый номер года (от 1 до 12), если введен его номер (четырехзначное число). Очевидно, нужно использовать деление с остатком (mod) на 12. Тогда, поделив номер года на 12, мы получим соответствие между остатком и названием года: 1- год крысы, 2 – быка, 3 – тигра, 4 – кролика, 5 – дракона, 6 – змеи, 7 – лошади, 8 – овцы, 9 – обезьяны, 10 – курицы, 11 – собаки, 0 – кабана. Однако, учитывая справку, понимаем, что надо делить с остатком не просто введенный год, но разность между годом и 1995. Тогда году 1996-му будет сопоставлена как раз единица:
(1996-1995) mod 12 = 1,
и остальные годы, как думается, будут соотнесены с календарем верно. Но, проверив, например 1976 год (год дракона), получаем (1976-1995) mod 12 = -19 mod 12 = -7, что неверно, ибо должно получиться 5. Однако 5 = -7 + 12! Поэтому нужно учесть отрицательные результаты, прибавим к ним 12! В итоге получим:
var n:integer;
begin
write('Введите ваш год рождения: ');
readln(n);
n:=(n-1995) mod 12; {получение остатка от деления}
if n<0 then n:=12+n; {учет отрицательных результатов}
case n of {начало оператора case}
1: writeln('Вы родились в год крысы!');
2: writeln('Вы родились в год быка!');
3: writeln('Вы родились в год тигра!');
4: writeln('Вы родились в год кролика!');
5: writeln('Вы родились в год дракона!');
6: writeln('Вы родились в год змеи!');
7: writeln('Вы родились в год лошади!');
8: writeln('Вы родились в год овцы!');
9: writeln('Вы родились в год обезьяны!');
10: writeln('Вы родились в год курицы!');
11: writeln('Вы родились в год собаки!');
0: writeln('Вы родились в год кабана!');
else
writeln('Что-то не так!');{учет (невероятной)
возможности нереальных
результатов}
end; {конец оператора case}
readln;
end.
Задачи, решаемые с помощью оператора if
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Вычислить значение функции:
-
Даны три целых числа. Возвести в квадрат отрицательные числа и в третью степень — положительные (число 0 не изменять).
-
Из трех данных чисел выбрать наименьшее.
-
Из трех данных чисел выбрать наибольшее.
-
Из трех данных чисел выбрать наименьшее и наибольшее.
-
Перераспределить значения переменных X и Y так, чтобы в X оказалось меньшее из этих значений, а в Y — большее.
-
Значения переменных X, Y, Z поменять местами так, чтобы они оказались упорядоченными по возрастанию.
-
Значения переменных X, Y, Z поменять местами так, чтобы они оказались упорядоченными по убыванию.
-
Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения.
-
Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной максимальное из этих значений, а если равны, то присвоить переменным нулевые значения.
-
Даны три переменные: X, Y, Z. Если их значения упорядочены по убыванию, то удвоить их; в противном случае заменить значение каждой переменной на противоположное.
-
Даны три переменные: X, Y, Z. Если их значения упорядочены по возрастанию или убыванию, то удвоить их; в противном случае заменить значение каждой переменной на противоположное.
-
Даны целочисленные координаты точки на плоскости. Если точка не лежит на координатных осях, то вывести 0. Если точка совпадает с началом координат, то вывести 1. Если точка не совпадает с началом координат, но лежит на оси OX или OY, то вывести соответственно 2 или 3.
-
Даны вещественные координаты точки, не лежащей на координатных осях OX и OY. Вывести номер координатной четверти, в которой находится данная точка.
-
На числовой оси расположены три точки: A, B, C. Определить, какая из двух последних точек (B или C) расположена ближе к A, и вывести эту точку и ее расстояние от точки A.
-
Даны четыре целых числа, одно из которых отлично от трех других, равных между собой. Вывести порядковый номер этого числа.
-
Дан номер некоторого года (положительное целое число). Вывести соответствующий ему номер столетия, учитывая, что, к примеру, началом 20 столетия был 1901 год.
-
Рис расфасован в два пакета. Масса первого – m кг., второго – n кг. Составить программу, определяющую массу более тяжелого пакета и выводящую сообщение, в котором бы фигурировала эта масса и номер пакета – первый или второй.
-
Определить количество четных среди чисел a, b, c.
-
Дано целое число, лежащее в диапазоне от –999 до 999. Вывести строку — словесное описание данного числа вида "отрицательное двузначное число", "нулевое число", "положительное однозначное число" и т.д.
-
Дано целое число, лежащее в диапазоне от 1 до 9999. Вывести строку — словесное описание данного числа вида "четное двузначное число", "нечетное четырехзначное число" и т.д.
-
Составить программу, которая по введенному с клавиатуры году возвращает сообщение, високосный это год или нет. Високосным считается год, делящийся на 4, за исключением тех лет, которые делятся на 100 и не делятся на 400 (например, годы 300, 1300 и 1900 не являются високосными, а 1200 и 2000 — являются).
-
Составить программу, которая по введенному вещественному значению x возвращает число 1, если x находится между четным и нечетным числами и –1, если x находится между нечетным и четным числами.
-
Составить программу, которая по заданному целому числу типа Word возвращает текстовое сообщение, в котором говорится о количестве цифр числа. Например, если x = 540, то программа выводит сообщение «Число 540 – трехзначное».
-
Составить программу, которая по заданному целому числу типа Integer возвращает текстовое сообщение, в котором говорится о знаке и количестве цифр числа. Например, если x = –540, то программа выводит сообщение «Число –540 – отрицательное и трехзначное».
-
Дан номер некоторого года (положительное целое число типа Word). Вывести соответствующий ему номер столетия. К примеру, 1901 год относится к 20 столетию, 1900 – к 19 столетию.
-
Пользователь вводит с клавиатуры три символа, два из которых одинаковы, а один отличен от них. Вывести на экран сообщение, какие порядковые номера соответствуют одинаковым символам, а какие – отличающемуся от них символу. К примеру, на введенные символы «ф», «ц», «ф» программа должна вывести сообщение «Одинаковы первый и третий символы, а второй отличается от них».
-
Составить программу, которая полностью определяет положение точки на координатной плоскости, то есть, выводит сообщения типа «Точка в первой четверти», «Точка на оси OX», и т.п.
-
Точки A, B, С заданы парами координат (x1, y1), (x2, y2) и (x3, y3) соответственно. Вывести на экран сообщение о том, лежат ли они на одной прямой или нет.
-
Пользователь вводит с клавиатуры координаты двух точек (x1, y1), (x2, y2) и коэффициенты a, b, c общего уравнения
некоторой прямой. Вывести на экран одно из сообщений: «Точки лежат на прямой», «Первая точка на прямой, а вторая – нет», «Вторая точка на прямой, а первая – нет», «Точки в разных полуплоскостях относительно прямой», «Точки в одной полуплоскости относительно прямой».
-
Пользователь вводит с клавиатуры координаты двух плоскостных векторов. Программа выводит сообщение о том, коллинеарные ли векторы или нет, и в случае их неколлинеарности вычисляет угол между ними.
-
Пользователь вводит с клавиатуры координаты трех пространственных векторов. Программа выводит сообщение о том, компланарны ли векторы или нет.
-
Пользователь вводит с клавиатуры координаты двух точек (x1, y1), (x2, y2). Программа выводит на экран сообщение о том, лежат ли точки в одной четверти или нет.
-
Точки A, B, С заданы парами координат (x1, y1), (x2, y2) и (x3, y3) соответственно. Вывести на экран сообщение о том, что данные точки являются вершинами невырожденного треугольника.
-
Составить программу, которая полностью описывает решение системы
, то есть, определяет количество корней и в случае единственности решения выводит это решение на экран.
-
Составить программу, которая по заданным коэффициентам a, b, c полностью описывает множество точек пересечения параболы
и осей координат и выводит на экран сообщение, подобное этим: «Парабола пересекается с осью OX в точках …, а с осью OY – в точке …» или «Парабола не пересекается с осью OX, а с осью OY – пересекается в точке …» и т.п.
-
Написать программу нахождения суммы большего и меньшего из трех чисел.
-
Даны три точки (x1, y1), (x2, y2) и (x3, y3). Определить, лежат ли они на одной прямой.
-
Написать программу, имитирующую ввод пароля (задать в программе строку, которая будет паролем, и если пользователь вводит не эту строку, то вывести сообщение «Пароль не верен», в противном случае вывести строку «Доступ разрешен»).
-
Составить программу, реализующую эпизод применения компьютера в магазине. Компьютер, зная стоимость покупки, анализирует сумму денег, внесенную покупателем: если сдачи не требуется, печатает на экране «спасибо»; если денег внесено больше, чем необходимо, то печатает «возьмите сдачу» и указывает сумму сдачи; если денег недостаточно, то печатает сообщение об этом и указывает размер недостающей суммы.
-
В ЭВМ поступают результаты соревнований по плаванию для трех спортсменов. Составить программу, которая выбирает наилучший результат и выводит его на экран с сообщением, что это результат победителя заплыва.
Задачи, решаемые с помощью оператора case
-
Дан номер месяца (1 — январь, 2 — февраль, ... ). Вывести название соответствующего времени года ("зима", "весна" и т.д.). Предусмотрите возможность неверного ввода.
-
Дан номер месяца (1 — январь, 2 — февраль, ... ). Вывести число дней в этом месяце для не високосного года. Предусмотрите возможность неверного ввода.
-
Дан номер месяца (1 — январь, 2 — февраль, ... ).. Вывести на экран строку, отображающую название соответствующего месяца. Предусмотрите возможность неверного ввода.
-
Дан номер месяца (1 — январь, 2 — февраль, ... ).. Вывести на экран строку, отображающую название следующего месяца. Предусмотрите возможность неверного ввода.
-
Дан номер месяца (1 — январь, 2 — февраль, ... ).. Вывести на экран строку, отображающую название предыдущего месяца. Предусмотрите возможность неверного ввода.
-
Дан номер дня недели (1 — понедельник, 2 — вторник, ... ).. Вывести на экран строку, отображающую название соответствующего дня недели. Предусмотрите возможность неверного ввода.
-
Дан номер дня недели (1 — понедельник, 2 — вторник, ... ).. Вывести на экран строку, отображающую название следующего дня недели. Предусмотрите возможность неверного ввода.
-
Дан номер дня недели (1 — понедельник, 2 — вторник, ... ).. Вывести на экран строку, отображающую название предыдущего дня недели. Предусмотрите возможность неверного ввода.
-
Дано целое число в диапазоне 0 – 9. Вывести строку — соответствующее название на русском языке (0 — "ноль", 1 — "один", 2 — "два", ...).
-
Дано целое число в диапазоне 1 – 5. Вывести строку — словесное описание соответствующей оценки (1 — "плохо", 2 — "неудовлетворительно", 3 — "удовлетворительно", 4 — "хорошо", 5 — "отлично").
-
Арифметические действия над числами пронумерованы следующим образом: 1 — сложение, 2 — вычитание, 3 — умножение, 4 — деление. Дан номер действия и два числа A и B (В не равно нулю). Выполнить над числами указанное выше действие и вывести результат.
-
Единицы длины пронумерованы следующим образом: 1 — дециметр, 2 — километр, 3 — метр, 4 — миллиметр, 5 — сантиметр. Дан номер единицы длины и длина отрезка L в этих единицах (вещественное число). Вывести длину данного отрезка в метрах.
-
Единицы массы пронумерованы следующим образом: 1 — килограмм, 2 — миллиграмм, 3 — грамм, 4 — тонна, 5 — центнер. Дан номер единицы массы и масса тела M в этих единицах (вещественное число). Вывести массу данного тела в килограммах.
-
Единицы объема пронумерованы следующим образом: 1 — литр, 2 — миллилитр, 3 — декалитр, 4 — кубометр. Дан номер единицы объема и объем тела V в этих единицах (вещественное число). Вывести объем данного тела в литрах.
-
Нумерация туземцев. На некотором острове туземцы обозначают числа так: 0 – «ничто», 1 – «один», 2 – «два», 3 – «три», для чисел, больших трех есть единое обозначение «много». Вывести обозначение целого числа, вводимого пользователем, на языке туземцев.
-
Тригонометрические функции пронумерованы следующим образом: 1 – синус, 2 – косинус, 3 – тангенс, 4 – котангенс. Пользователь вводит с клавиатуры номер функции n и аргумент X. Вывести на дисплей результат вычисления соответствующей тригонометрической функции от X.
-
Гиперболические функции пронумерованы следующим образом: 1 – sh(X), 2 – ch(X), 3 – th(X), 4 – cth(X). Пользователь вводит с клавиатуры номер функции n и аргумент X. Вывести на дисплей результат вычисления соответствующей гиперболической функции от X.
-
Пользователь вводит с клавиатуры двузначное число, не меньшее 20. Вывести его прочтение на экран. Например, если введено число 35, то на экран выводится строка «тридцать пять».
-
Перевод в римскую нумерацию. Пользователь вводит число из диапазона от 1 до 10. Компьютер выводит на экран это же число, но в римской нумерации.
-
Дано целое число в диапазоне 0 – 9. Вывести строку — название соответствующей цифры на английском языке (0 — "zero", 1 — "one", 2 — "two", 3 — "three", 4 — "four", 5 — "five", 6 — "six", 7 — "seven", 8 — "eight", 9 — "nine").
Дополнительные задачи к разделу (на использование оператора if)
-
Пользователь вводит с клавиатуры три вещественных числа a, b, c. Подсчитать, сколько среди них целых чисел.
-
Пользователь вводит с клавиатуры три вещественных числа a, b, c. Подсчитать, сколько среди них дробных чисел.
-
Пользователь вводит с клавиатуры три вещественных числа a, b, c. Подсчитать, сколько среди них положительных чисел.
-
Пользователь вводит с клавиатуры три вещественных числа a, b, c. Подсчитать, сколько среди них отрицательных чисел.
-
Пользователь вводит с клавиатуры три вещественных числа a, b, c. Подсчитать, сколько среди них нулей.
-
Пользователь вводит с клавиатуры три вещественных числа a, b, c. Подсчитать, сколько среди них ненулевых чисел.
-
Пользователь вводит с клавиатуры четыре целых числа: a, b, c и d. Определить, делителем каких из чисел a, b, c является число d.
-
Пользователь вводит с клавиатуры четыре целых числа: a, b, c и d. Определить, какие из чисел a, b, c не делятся на d.
-
Пользователь вводит с клавиатуры четыре целых числа: a, b, c и d. Определить, какие из чисел a, b, c больше d.
-
Пользователь вводит с клавиатуры четыре целых числа: a, b, c и d. Определить, какие из чисел a, b, c меньше d.
-
Пользователь вводит с клавиатуры целое трехзначное число n. Определить, на каком месте находится наибольшая из его цифр.
-
Пользователь вводит с клавиатуры целое трехзначное число n. Определить, на каком месте находится наименьшая из его цифр.
При решении задач 3.93-3.97 используйте следующую информацию: процедура Randomize выполняет перезапуск генератора случайных чисел, она выполняется один раз в начале программы. Функция Random без параметров возвращает случайное число из диапазона от 0 до 1, а функция Random(n), где n – целое, возвращает случайное целое число из диапазона от 0 до n – 1.
-
С помощью функций Randomize и Random получить случайное число из диапазона [0; 1) и определить, меньше ли оно, чем 0,5.
-
С помощью функций Randomize и Random получить случайное число из диапазона [0; 1) и определить, больше ли оно, чем 0,5.
-
С помощью функций Randomize и Random получить целое случайное число из диапазона [0; 10] и определить, меньше ли оно, чем 5.
-
С помощью функций Randomize и Random получить целое случайное число из диапазона [0; 10] и определить, больше ли оно, чем 5.
-
Задача-прогноз. Пользователь вводит с клавиатуры некоторое целое число из диапазона [0; 5]. С помощью функций Randomize и Random компьютер генерирует целое случайное число из этого же диапазона и проверяет, угадал ли пользователь это число.
-
Пользователь вводит с клавиатуры одну из строк: ‘червы’, ‘бубны’, ‘трефы’, ‘пики’. Компьютер выводит на экран символ соответствующей масти (♥ ♦ ♣ ♠). Коды символов мастей принимают значения от 3 до 6. Для получения символа по заданному коду используйте функцию chr(x).
-
Пользователь вводит с клавиатуры одну из строк: ‘вверх’, ‘вниз’, ‘вправо’, ‘влево’. Компьютер выводит на экран соответствующую стрелочку (↑ ↓ → ←). Коды стрелок принимают значения от 24 до 27. Для получения символа по заданному коду используйте функцию chr(x).
-
Пользователь вводит с клавиатуры одну из строк: ‘мужчина’, ‘женщина’. Компьютер выводит на экран соответствующий символ (♂ ♀). Коды данных символов принимают значения 11 и 12. Для получения символа по заданному коду используйте функцию chr(x).
При решении задач 3.101-3.106 используйте следующую информацию: коды цифр принимают значения от 48 до 58, латинских прописных букв – от 65 до 90, латинских строчных букв – от 97 до 122, прописных букв кириллицы – от 128 до 159, строчных букв кириллицы – от 160 до 175 и от 224 до 239, буква Ё имеет код 240, буква ё – 241. Для получения кода по заданному символу используйте функцию ord(x).
-
Пользователь вводит с клавиатуры некоторый символ (используйте тип char). Определить, является ли этот символ цифрой.
-
Пользователь вводит с клавиатуры некоторый символ (используйте тип char). Определить, является ли этот символ прописной латинской буквой.
-
Пользователь вводит с клавиатуры некоторый символ (используйте тип char). Определить, является ли этот символ строчной латинской буквой.
-
Пользователь вводит с клавиатуры некоторый символ (используйте тип char). Определить, является ли этот символ прописной буквой кириллицы.
-
Пользователь вводит с клавиатуры некоторый символ (используйте тип char). Определить, является ли этот символ строчной буквой кириллицы.
-
Составить программу, определяющую результат гадания на ромашке (любит, не любит, плюнет, поцелует), взяв за исходное данное число лепестков n.
-
Точки A, B, С, D заданы парами координат (x1, y1), (x2, y2), (x3, y3), (x4, y4) соответственно. Вывести на экран сообщение о том, что данные точки являются вершинами параллелограмма ABCD.
-
Точки A, B, С, D заданы парами координат (x1, y1), (x2, y2), (x3, y3), (x4, y4) соответственно. Вывести на экран сообщение о том, что данные точки являются вершинами ромба ABCD.
-
Точки A, B, С, D заданы парами координат (x1, y1), (x2, y2), (x3, y3), (x4, y4) соответственно. Вывести на экран сообщение о том, что данные точки являются вершинами прямоугольника ABCD.
-
Точки A, B, С, D заданы парами координат (x1, y1), (x2, y2), (x3, y3), (x4, y4) соответственно. Вывести на экран сообщение о том, что данные точки являются вершинами трапеции ABCD с основаниями AB и CD.
-
Две прямые заданы уравнениями
и
(подумайте, какие параметры задает пользователь). Определить взаимное расположение прямых (совпадают, пересекаются, параллельны).
-
Две прямые заданы уравнениями
и
(подумайте, какие параметры задает пользователь). Определить взаимное расположение прямых (совпадают, пересекаются, параллельны).
-
Окружность и прямая заданы уравнениями
и
(подумайте, какие параметры задает пользователь). Определить взаимное расположение фигур (пересекаются, касаются, не пересекаются).
-
Точки A, B, С заданы парами координат (x1, y1), (x2, y2) и (x3, y3) соответственно. Проверить, является ли фигура ABC правильным треугольником.
-
Точки A, B, С заданы парами координат (x1, y1), (x2, y2) и (x3, y3) соответственно. Проверить, является ли фигура ABC прямоугольным треугольником.
-
Точки A, B, С заданы парами координат (x1, y1), (x2, y2) и (x3, y3) соответственно. Проверить, является ли фигура ABC остроугольным треугольником.
-
Точки A, B, С заданы парами координат (x1, y1), (x2, y2) и (x3, y3) соответственно. Проверить, является ли фигура ABC тупоугольным треугольником.
-
С помощью функций Randomize и Random получить три случайных числа a, b, c из диапазона [−10; 10] (используйте выражение random(21)-10) и определить, положительно ли выражение a + b + c.
-
С помощью функций Randomize и Random получить три случайных числа a, b, c из диапазона [−10; 10] (используйте выражение random(21)-10) и определить, положительно ли выражение a b c.
-
В начале погони между волком и зайцем было расстояние s (м). Приняв допущение, что животные движутся равномерно и прямолинейно, определить, нагонит ли волк зайца при заданных скоростях v1 (м/c) и v2 (м/c) соответственно (v1 > v2) за время t (c).