Question

Написать программу Pascal Дано вещественное число - 1 кг конфет.Вывести стоимость 1, 2, ..., 10 кг конфет--------------------------------------------Исходные данные 85.60--------------------------------------------Пример верного решения85.60 171.20 256.80 342.40 428.00 513.60 599.20 684.80 770.40 856.00

Answer 1

===== PascalABC.NET =====

begin

 var c := ReadReal;

 SeqGen(10, i -> $'{c * i:f2}', 1).Print

end.

Answer 2

Для решения данной задачи на языке программирования Pascal можно использовать цикл и арифметические операции. Вот пример программы, которая решает данную задачу: ```pascal program CalculateCost; var weight: real; // Вес конфет price: real; // Цена за кг конфет totalCost: real; // Общая стоимость begin price := 85.60; // Исходная цена за 1 кг конфет for weight := 1 to 10 do begin totalCost := weight * price; writeln('Стоимость ', weight:2:0, ' кг конфет: ', totalCost:5:2); end; end. ``` В этой программе мы объявляем три переменных: `weight` для хранения веса конфет, `price` для хранения цены за 1 кг конфет и `totalCost` для хранения общей стоимости. Затем мы устанавливаем исходную цену за 1 кг конфет в переменную `price`. Затем мы используем цикл `for` для прохода от 1 до 10 кг конфет. В каждой итерации цикла мы умножаем вес на цену за 1 кг, чтобы получить общую стоимость, и выводим результат на экран с помощью `writeln`. Вышеуказанная программа выводит стоимость 1, 2, ..., 10 кг конфет, используя исходные данные цены 85.60 за 1 кг конфет. Программа выводит результаты в следующем формате: ``` Стоимость 1 кг конфет: 85.60 Стоимость 2 кг конфет: 171.20 Стоимость 3 кг конфет: 256.80 Стоимость 4 кг конфет: 342.40 Стоимость 5 кг конфет: 428.00 Стоимость 6 кг конфет: 513.60 Стоимость 7 кг конфет: 599.20 Стоимость 8 кг конфет: 684.80 Стоимость 9 кг конфет: 770.40 Стоимость 10 кг конфет: 856.00 ``` Надеюсь, это поможет вам решить задачу! Если у вас возникнут еще вопросы, пожалуйста, дайте мне знать.