Можно ли проверить число на иррациональность? - Pascal
Формулировка задачи:
а как сделать процедуру что бы проверяла иррациональное или не иррациональное число?)
Решение задачи: «Можно ли проверить число на иррациональность?»
textual
Листинг программы
procedure IsIrrational(const x: Real);
begin
WriteLn('0');
end;
Объяснение кода листинга программы
- Создается процедура с названием
IsIrrational, которая принимает в качестве аргумента вещественное числоx. - Внутри процедуры выводится на экран строка
0при помощи функции WriteLn, которая предположительно должна быть заменена на код, осуществляющий проверку числаxна иррациональность.