If12. Даны три числа. Найти наименьшее из них.
Записи с меткой «Паскаль»
Решаем задачи Абрамян на Паскале. If11
If11. Даны две переменные целого типа: $$A$$ и $$B$$. Если их значения не равны, то присвоить каждой переменной большее из этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных $$A$$ и $$B$$.
Решаем задачи Абрамян на Паскале. If10
If10. Даны две переменные целого типа: $$A$$ и $$B$$. Если их значения не равны, то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. Вывести новые значения переменных $$A$$ и $$B$$.
Решаем задачи Абрамян на Паскале. Proc 8
Proc8. Описать процедуру AddRightDigit($$D$$, $$K$$), добавляющую к целому положительному числу $$K$$ справа цифру $$D$$ ($$D$$ — входной параметр целого типа, лежащий в диапазоне 0-9, $$K$$ — параметр целого типа, являющийся одновременно входным и выходным). С помощью этой процедуры последовательно добавить к данному числу K справа данные цифры $$D_1$$ и $$D_2$$, выводя результат каждого добавления.
Решаем задачи Абрамян на Паскале. Proc 12
Proc12. Описать процедуру SortInc3($$A$$, $$B$$, $$C$$), меняющую содержимое переменных $$A$$, $$B$$, $$C$$ таким образом, чтобы их значения оказались упорядоченными по возрастанию ($$A$$, $$B$$, $$C$$ — вещественные параметры, являющиеся одновременно входными и выходными). С помощью этой процедуры упорядочить по возрастанию два данных набора из трех чисел: ($$A_1$$, $$B_1$$, $$C_1$$) и ($$A_2$$, $$B_2$$, $$C_2$$).
Решаем задачи Абрамян на Паскале. Proc 13
Proc13. Описать процедуру SortDec3($$A$$, $$B$$, $$C$$), меняющую содержимое переменных $$A$$, $$B$$, $$C$$ таким образом, чтобы их значения оказались упорядоченными по убыванию ($$A$$, $$B$$, $$C$$ — вещественные параметры, являющиеся одновременно входными и выходными). С помощью этой процедуры упорядочить по убыванию два данных набора из трех чисел: ($$A_1$$, $$B_1$$, $$C_1$$) и ($$A_2$$, $$B_2$$, $$C_2$$).
Решаем задачи Абрамян на Паскале. If 9
If9. Даны две переменные вещественного типа: A, B. Перераспределить значения данных переменных так, чтобы в A оказалось меньшее из значений, а в B — большее. Вывести новые значения переменных A и B.
Решаем задачи Абрамян на Паскале. If 8
If8. Даны два числа. Вывести вначале большее, а затем меньшее из них.
Решаем задачи Абрамян на Паскале. If 7
If7. Даны два числа. Вывести порядковый номер меньшего из них.
Решаем задачи Абрамян на Паскале. Proc 18
Proc18. Описать функцию CircleS($$R$$) вещественного типа, находящую площадь круга радиуса $$R$$ ($$R$$ — вещественное). С помощью этой функции найти площади трех кругов с данными радиусами. Площадь круга радиуса $$R$$ вычисляется по формуле $$S = \pi*R^2$$. В качестве значения $$\pi$$ использовать 3.14.