Question

Цена товара обозначена в рублях с точностью до копеек, то есть вещественным числом с двумя цифрами после десятичной точки. В целочисленных переменных получите и выдайте значения целого числа рублей и целого числа копеек в цене товара.

Answer 1

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.

Answer 2

Для получения и вывода значений целого числа рублей и целого числа копеек в цене товара, которая обозначена в рублях с точностью до копеек, можно использовать целочисленные переменные и операции деления и остатка от деления.

Вот пример кода на языке Pascal, который выполняет данную задачу:

var
  price: real; // переменная для хранения цены товара
  rubles, kopeks: integer; // переменные для хранения целого числа рублей и копеек

begin
  // считываем цену товара
  readln(price);

// вычисляем целое число рублей и копеек
  rubles := trunc(price);
  kopeks := round((price - rubles) * 100);

// выводим результат
  writeln('Рубли: ', rubles);
  writeln('Копейки: ', kopeks);
end.

В этом примере мы используем функцию `trunc` для получения целой части числа и функцию `round` для округления дробной части до двух знаков после запятой. Затем мы присваиваем полученные значения переменным `rubles` и `kopeks` и выводим их на экран.

Примечание: В данном примере используется язык программирования Pascal. Если вы хотите использовать другой язык программирования, например, Java, Python или C++, дайте мне знать, и я предоставлю вам пример кода на выбранном вами языке.

Надеюсь, это поможет! Если у вас возникнут еще вопросы, не стесняйтесь задавать их.