• срочно завтро самостоятльная помогите пожалуста заранее спасибо
    составить программу вычисления значения суммы чисел: 14;15;16;17;.... пока сумма не достигнет числа k

Ответы 1

  • vara,k:integer;beginread(k);a:=14;while a<=k begink:=k+a;a:=a+1;end;writeln(Сумма: ,k);end.
  • Добавить свой ответ

Войти через Google

или

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

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

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