Помогите составить программу решения задачи в паскале АВС.Дано вещественное число - цена...

Question

Помогите составить программу решения задачи в паскале АВС.
Дано вещественное число - цена 1 кг конфет. Вывести стоимость 0.1,0.2...,1кг конфет

Answer 1

Var C, i: real;
begin
     readln(C); 
     i := 0.1;
     while (i <= 1) do<br>     begin
          writeln(C * i);
          i := i + 0.1;
     end;
end.

Уже решал, но теперь по-другому)