Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
strange0311
18.02.2023 17:31 •
Информатика
Составьте программу, которая преобразует введенное с клавиатуры дробное число в денежный формат. например, число 12,348 должно быть преобразовано к виду 12 руб. 35 коп.
Показать ответ
Ответ:
алинкажемчуг
02.10.2020 03:20
Var i:integer; j,n:real;
begin
write('Введите число: '); readln(n);
i:=trunc(n);
j:=round(frac(n)*100);
write(i,' руб. ',j, ' коп.');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
zaydfudimp0dicv
01.12.2021 13:10
Компьютер, на котором предполагается работать с мультимедийными продуктами, должен быть дополнительно укомплектован: звуковой картой флеш-накопителем специальной клавиатурой видеокамерой...
oljkejik
09.12.2020 15:47
Какие существуют подходы к измерению информации?...
Silestya
12.04.2021 00:33
Скорость передачи данных через некоторое соединёние составляет 512000 бит/сёк. Определите наибольший размер файла в битах, который может быть передан через данное соединение за 2...
VeZun4ik
07.11.2021 02:15
Выполнить описание типичных конфигураций компьютера. Офисная/ «домашняя» (low-end) конфигурация. Такой компьютер, в первую очередь, предназначен для работы. Сюда можно отнести использование...
milanavornik
09.09.2022 01:34
РЕШИТЬ КРОССВОРД. Алгоритм, содержащий вс алгоритмы(8БУКВ)...
ТыУмНыЙ
09.04.2020 19:58
Выберите правильные утверждения(установите соответствие) print() max() input((int)) int(input()) range() tuple() input() len() Вывод на экран Ввод с клавиатуры Длина объекта Ввод...
kamilla195
19.05.2023 12:14
Создайте программу на языке паскаль, которая отвечает критериям текста...
SimbatDuysebek
03.05.2023 02:18
Установите соответствие. А)Энергозависимая память Б)Автоматическое распознавание лиц В)Устройства ввода информации Г)Карта памяти 64 GB 1)Кратковременная память 2)Органы чувств 3)Долговременная...
софи157
29.11.2022 10:49
Установите соответствие. А)8 байт Б)1024 байта В)2 байта Г)2048 Кбайт 1)2 Мбайта 2)64 бита 3)1 Кбайт 4)16 бит...
mariamarkova609
08.11.2021 00:27
Какое число будет напечатано в результате выполнения следующего фрагмента кода?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('Введите число: '); readln(n);
i:=trunc(n);
j:=round(frac(n)*100);
write(i,' руб. ',j, ' коп.');
end.