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

     

Ответы 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.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years