Question

Дано вещественное число, Цена 1 кг конфет. Вывести Стоимость 1,2,3...10кг конфет. Нарисовать блок схему

Answer 1

var i,x:integer;
begin;
readln(x);
for i:=1 to 10 do
writeln('Для ',i,' кг нужно ',i*x);
end.