profile
Опубликовано 5 лет назад по предмету Информатика от sueta1

 Дано вещественное число – цена 1кг конфет. Вывести стоимость 0.1, 0.2, … , 1кг. Входные
данные: ввести одно вещественное число
A (1<=A<=100). Выходные
данные: вывести стоимость 0.1, 0.2, … , 1кг
конфет с точностью до 4 цифр в дробной части.

  1. Ответ
    Ответ дан HRAshton
    var a, i: real;
    begin
         readln(a);
         while (i <= 1) do
         begin
             i := i + 0.1;
             writeln(i, ' kg -> ', i * a:4:4, ' y.e.');
         end;
    end.

    :))
Самые новые вопросы