Proc23. Описать функцию Quarter($$x$$, $$y$$) целого типа, определяющую номер координатной четверти, в которой находится точка с ненулевыми вещественными координатами ($$x$$, $$y$$). С помощью этой функции найти номера координатных четвертей для трех точек с данными ненулевыми координатами.
Записи с меткой «Паскаль»
Решаем задачи Абрамян на Паскале. Proc 22
Proc22. Описать функцию Calc($$A$$, $$B$$, $$Op$$) вещественного типа, выполняющую над ненулевыми вещественными числами $$A$$ и $$B$$ одну из арифметических операций и возвращающую ее результат. Вид операции определяется целым параметром $$Op$$: 1 — вычитание, 2 — умножение, 3 — деление, остальные значения — сложение. С помощью $$Calc$$ выполнить для данных $$A$$ и $$B$$ операции, определяемые данными …
Решаем задачи Абрамян на Паскале. Proc 21
Proc21. Описать функцию SumRange($$A$$, $$B$$) целого типа, находящую сумму всех целых чисел от $$A$$ до $$B$$ включительно ($$A$$ и $$B$$ — целые). Если $$A > B$$, то функция возвращает 0. С помощью этой функции найти суммы чисел от $$A$$ до $$B$$ и от $$B$$ до $$C$$, если даны числа $$A, B, C$$.
Решаем задачи Абрамян на Паскале. Proc 19
Proc19. Описать функцию RingS($$R_1$$, $$R_2$$) вещественного типа, находящую площадь кольца, заключенного между двумя окружностями с общим центром и радиусами $$R_1$$ и $$R_2$$ ($$R_1$$ и $$R_2$$ — вещественные, $$R_1 > R_2$$). С ее помощью найти площади трех колец, для которых даны внешние и внутренние радиусы. Воспользоваться формулой площади круга радиуса $$R$$: $$S = \pi*R^2$$. В качестве …
Решаем задачи Абрамян на Паскале. Proc 16
Proc16. Описать функцию Sign($$X$$) целого типа, возвращающую для вещественного числа $$X$$ следующие значения: -1, если $$X < 0$$; 0, если $$X = 0$$; 1, если $$X > 0$$. С помощью этой функции найти значение выражения Sign($$A$$) + Sign($$B$$) для данных вещественных чисел $$A$$ и $$B$$.
Решаем задачи Абрамян на Паскале. Proc 15
Proc15. Описать процедуру ShiftLeft3($$A$$, $$B$$, $$C$$), выполняющую левый циклический сдвиг: значение $$A$$ переходит в $$C$$, значение $$C$$ — в $$B$$, значение $$B$$ — в $$A$$ ($$A$$, $$B$$, $$C$$ — вещественные параметры, являющиеся одновременно входными и выходными). С помощью этой процедуры выполнить левый циклический сдвиг для двух данных наборов из трех чисел: ($$A_1$$, $$B_1$$, $$C_1$$) и …
Решаем задачи Абрамян на Паскале. Proc 14
Proc14. Описать процедуру ShiftRight3($$A$$, $$B$$, $$C$$), выполняющую правый циклический сдвиг: значение $$A$$ переходит в $$B$$, значение $$B$$ — в $$C$$, значение $$C$$ — в $$A$$ ($$A$$, $$B$$, $$C$$ — вещественные параметры, являющиеся одновременно входными и выходными). С помощью этой процедуры выполнить правый циклический сдвиг для двух данных наборов из трех чисел: ($$A_1$$, $$B_1$$, $$C_1$$) и …
Решаем задачи Абрамян на Паскале. Proc 11
Proc11. Описать процедуру Minmax($$X$$, $$Y$$), записывающую в переменную $$X$$ минимальное из значений $$X$$ и $$Y$$, а в переменную $$Y$$ — максимальное из этих значений ($$X$$ и $$Y$$ — вещественные параметры, являющиеся одновременно входными и выходными). Используя четыре вызова этой процедуры, найти минимальное и максимальное изданных чисел $$A$$, $$B$$, $$C$$, $$D$$.
Задача на работу с файлами. Pascal
Дан файл целых чисел. Элементы могут принимать значения от 0 до 100 — баллы, полученные на ЕГЭ. Опишите алгоритм, который подсчитывает и выводит на экран наибольший балл среди учащихся, сдавших экзамен (получивших оценку более 25 баллов) либо вывести сообщение, что таких нет.
Решаем задачи Абрамян на Паскале. Proc 10
Proc10. Описать процедуру Swap($$X$$, $$Y$$), меняющую содержимое переменных $$X$$ и $$Y$$ ($$X$$ и $$Y$$ — вещественные параметры, являющиеся одновременно входными и выходными). С ее помощью для данных переменных $$A$$, $$B$$, $$C$$, $$D$$ последовательно поменять содержимое следующих пар: $$A$$ и $$B$$, $$C$$ и $$D$$, $$B$$ и $$C$$ и вывести новые значения $$A$$, $$B$$, $$C$$, $$D$$.