Question

Дано вещественное число - цена 1 кг конфет. Вывести стоимость 1, 2, 3 - 10 кг конфет. Помогите, очень прошу. Среда - Паскаль. Исполнитель - цикл с параметром. Зарание, спасибоо!!!!!

 

Answer 1

Var z,x:real;

i:integer;

a:array [1..10] of real;

begin

readln(z);

for i:=1 to 10 do begin

a[i]:=z*i;

writeln(a[i]);

end;

end.