Составьте программу, которая запрашивает стоимость 1 кг конфет и выводит на экран стоимость 0.1, 0.2, 0.3, ..., 1 кг конфет. Результат работыпрограммы может выглядеть так:Введите стоимость 1 кг конфет: 7.6Стоимость 0.1 кг конфет = 0.76 руб.Стоимость 0.2 кг конфет = 1.52 руб.Стоимость 0.3 кг конфет = 2.28 руб.
var
s : real;
begin
write('введите стоимость 1 кг конфет: ');
readln(s);
for var i := 1 to 9 do begin
writeln('стоимость ',i/10, ' кг конфет ', s*i/10);
end;
end.