Есть ответ 👍

Дано вещественное число,цена 1кг. конфет,вывести стоимость от 1 до 10

185
312
Посмотреть ответы 1

Ответы на вопрос:


Var n,k: integer; begin write('n='); readln(n); while n< > 0 do   begin   writeln(n mod 10);   n: =n div 10;   end; end. пример: n=12756 6 5 7 2 1

Популярно: Информатика