В программу вводится стоимость 1 кг. конфет,написать программу,с помощью оператора FOR которая выводит на экран стоимость 1,2,3,4,5,6,7,8,9,10 кг.конфет)
Var a:real; i:integer; begin writeln ('Введите стоимость 1 кг. конфет:'); readln (a); for i:= 1 to 10 do writeln (i*a); end.