Question

помогите пожалуйста!!! pascal abc 8 класс
Дано вещественное число - цена 1 кг конфет, вывести стоимость 100г,200г...1кг

Answer 1

var i,n:real;
begin
  read (n);
  for i:=1 to 10 do
    write (i*n/10)
end.