Proc16. Описать функцию Sign($$X$$) целого типа, возвращающую для вещественного числа $$X$$ следующие значения: -1, если $$X < 0$$; 0, если $$X = 0$$; 1, если $$X > 0$$. С помощью этой функции найти значение выражения Sign($$A$$) + Sign($$B$$) для данных вещественных чисел $$A$$ и $$B$$.
Решение от Дмитрия:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
алг proc16 нач вещ A, B, ответ вывод "Введите число A: " ввод A вывод "Введите число B: " ввод B ответ:=Sign(A)+Sign(B) вывод "Sign(A)+Sign(B)= ", ответ, нс кон алг цел Sign (арг вещ X) нач выбор при X<0: знач:=-1 при X=0: знач:=0 при X>0: знач:=1 все кон |
Другие задачи из раздела Proc можно посмотреть здесь.
Комментарии: