Ввести дробное число. Возвести в квадрат дробную часть числа. Задача в паскале! Срочно

Ввести дробное число. Возвести в квадрат дробную часть числа. Задача в паскале! Срочно
Гость
Ответ(ы) на вопрос:
Гость
Вот программка: uses Crt; var  n, drob: real; begin   ClrScr;   Write (' n = ');   ReadLn(n);   drob:=(frac(n)*frac(n));   WriteLn(' drob^2 =', drob:8:4);   ReadLn; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы