• var x,y,p,i:integer;
    begin
    readln(x,y);
    for i:=1 to abs(y) do p:=p+x;
    if y<0 then p:=-p;
    writeln(p);
    end.
    Что Такое ABC?

Ответы 2

  • Спасибо
  • Не АBC, а ABS - функция, которая возвращает модуль числа. Если пользователь ввел у отрицательный, то в данном примере в описании цикла будет использоваться положительное значение переменной у
    • Автор:

      gumdrop
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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