Вывести дробную часть заданного положительного числа А(Паскаль)
Вывести дробную часть заданного положительного числа А(Паскаль)
Ответ(ы) на вопрос:
Program al;
var a:real;
begin
writeln('a=');
readln(a)
;if a>0 then writeln(frac(a) )
else writeln( 'a otritatelinoe');
readln;
end.
Не нашли ответ?
Похожие вопросы