tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Цена товара обозначена в рублях
Цена товара обозначена в рублях с точностью до копеек, то есть вещественным числом с двумя цифрами после десятичной точки. в целочисленных переменных получите и выдайте значения целого числа рублей и целого числа копеек в цене товара.
YeezyM
3 27.08.2019 14:00
4
Ответы
sinethu
14.08.2020 21:28
Program n1;
var a: real;
r,k: integer;
begin
readln(a);
r:=trunc(a);
k:=trunc(a*100);
k:=(k mod 100);
writeln('рубли:',r);
writeln('копейки:',k);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Sk174
01.04.2021 14:19
1 Відкрийте середовище скретч 2 2 Складіть проект для малювання чотирьох різнокольорових кіл, зображених на зразку 1. 3 проекту вашій папці у файлі з іменем практична...
valare338
18.10.2020 22:51
Как найти i(малое) в информатике, и дайте формулы как найти i , I , N , K?...
Миша75040406
18.10.2020 22:07
15.2 Напишите программу, которая в последовательности целых чисел определяет сумму двух наибольших и сумму двух наименьших. Программа должна...
друг100
18.10.2020 22:52
Отсортируй числа от 0 до 9 в порядке возрастания. Некоторые числа представлены в двоичном виде. ...
hhhhh122
18.10.2020 22:52
Рассмотрите рисунок, какие устройства можно подключить к компьютеру через порты...
Valerykh123
18.10.2020 22:09
сократить запись: a,b=map(int,input().split()) if a b:print( ) elif a или =)...
Ленабогатова1
18.10.2020 22:09
Установите последовательность действий при Распаковки архиваA)Выберите команду «Извлечь файлы»Б)Нажмите кнопку ОКВ)Выделите архив для распаковкиГ)Вызовите контекстное...
Mashka063
18.10.2020 22:10
Определите три функции процессора...
nastyasergeeva9
18.10.2020 22:11
1.Как читать число, если меньшая цифра стоит перед большей? 2.Как читать число, если меньшая цифра стоит после большей?...
panaitov023
18.10.2020 22:11
Scratch 2 ортасының кеңейтілімі қандай?...
Популярные вопросы
Морфологический разбор слова отворотясь...
3
Вкакое учебное заведение поступил михаил юрьевич лермонтов в...
3
Какие оминокислоты незаменимыми? сколько их?...
2
Прямая ст-биссектриса равнобедренного треугольника вкс (вк=вс),...
2
Описание действующего вулкана подробно...
2
Решите. преобразуйте произведение и вычислительные его значение:...
1
45: х=1 38*х=38 42: х=42 36-х=1 х: 34=1 х*54=54 х-34=34 24+х=24...
3
Лексическое значение слов: фиксаж светец покемон дорога бурак...
3
Найдите угол между касательной к графику функции y=f(x) в его...
3
Вреакцию вступают сложное вещество а состоящее из атомов элементов...
1
var a: real;
r,k: integer;
begin
readln(a);
r:=trunc(a);
k:=trunc(a*100);
k:=(k mod 100);
writeln('рубли:',r);
writeln('копейки:',k);
end.