Вывести дробную часть заданного положительного числа а(паскаль)
alinaozhiganova
2
29.06.2019 08:00
1
Другие вопросы по теме Информатика
demoplus1
03.08.2019 04:00
chorna202
03.08.2019 04:10
SergeyPomoshnik
03.08.2019 04:10
silinadasha
07.05.2020 19:50
dedovdima14
07.05.2020 19:50
ттатт
07.05.2020 19:50
ochensad
24.09.2019 05:50
odarka1596
24.09.2019 05:50
Собакамаилру
24.09.2019 05:40
Популярные вопросы
- Подберите проверочное слово к слову прояснилось...
2 - Уравностороннего треугольника высота проведенная к стороне равна 8см . найти сторону...
2 - Высота проведенная к основанию равнобедренного треугольника равна 9, основание 24,...
3 - Сочинение 3 класс по произведению певцы...
1 - Два поезда вышли одновременно навстречу друг другу из двух городов,расстояние между...
2 - На котоде при электролизе выделилось 25 г никеля за 30 минут. найдите силу тока...
2 - На базе хранится 590 тонн овощей. при этом картофеля в 2,5 раза больше, чем моркови....
2 - Қара жорға биі денсаулыққа пайдалы ма? өз пікірлеріңді дәлелдеңдер....
2 - На базе хранится 520 тонн рыбы. при этом трески в 1,5 раза больше, чем наваги. окуня...
1 - 1)решите относительно x уравнение 12x^2+7cx+c^2 2) линейным или квадратным является...
2
var a:real;
begin
writeln('a=');
readln(a)
;if a>0 then writeln(frac(a) )
else writeln( 'a otritatelinoe');
readln;
end.