logo
Войти Регистрация Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
takhtarkina
takhtarkina
04.04.2023 10:39 •  Информатика

Дано действительное число. вывести целую и дробную части этого числа. число задать статически.

Ответ:
sumochkaaaaa
sumochkaaaaa
03.07.2020 16:16
Const a:real=345.75;
begin
writeln(int(a));
writeln(frac(a));
end.
0,0(0 оценок)
Популярные вопросы: Информатика
lana205oziu8n
lana205oziu8n
18.05.2020 10:41
Сравните вычисления в калькуляторе и вычисления в Python.Проанализируйте их сходства и различия очень нужно, буду благодарна....
vladka0405
vladka0405
13.10.2021 02:34
1. миша шифрует слова, записывая вместо каждой буквы её номер в алфавите (без пробелов). только одна шифровка расшифровывается единственным образом.) 1 слово - 2016, 2 слово - 2345,...
steamoff
steamoff
13.10.2021 02:34
Склавиатуры вводится число,определить является ли оно четным,результат вывести на экран. (написать программу в паскале)...
aiis171
aiis171
13.10.2021 02:34
Решить (подробно): найдите ошибки в алгоритме: for i: = 1 to n do begin for j: = 1 to m do c[i,j]: =a[i,j]+ a[i,j] end; какую типовую выполняет алгоритм?...
bogachea
bogachea
07.01.2022 20:51
Визначте, які оператори реалізують дію: Знайти суму перших десяти натуральних чисел. Позначте всі правильні відповіді. * Whіle i = 10 do begin A := A+1; S := S+i end; if A 10 then...
fantomac718
fantomac718
01.08.2021 05:44
Чому дорівнює Х після виконання циклу. Вкажіть одну відповідь. x := 1; While x 5 do x := x*2 ; *...
Дарья122004
Дарья122004
14.02.2023 00:37
Pascal Решите procedure F(n: integer); begin write(n); if n = 3 then begin F(n div 2); F(n - 1) end end; Запишите подряд без пробелов и разделителей все числа, которые будут выведены...
какахааа
какахааа
20.04.2020 07:47
Сделать таблицу в exel и пару вещей ! на изи...
lina28052003
lina28052003
08.03.2020 06:02
Понятность – это свойство алгоритма, заключающееся в том, что:...
Selbrit
Selbrit
05.05.2022 16:50
Сколько существует натуральных чисел x, для которых выполняется неравенство ответ, мне свериться нужно)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?