Помогите составить программу

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

Задать свой вопрос
1 ответ
Var C, i: real;
begin
     readln(C); 
     i := 0.1;
     while (i lt;= 1) do
     begin
          writeln(C * i);
          i := i + 0.1;
     end;
end.

Теснее решал, но сейчас по-иному)
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт