• определите значение переменной s после выполнения фрагмента программы
    s := 0;
    x := 2019;
    while x > 0 do begin
    x := x - 1;
    s := s + 1;
    end;

Ответы 1

  • program pr11;

    var

    s,x:real;

    begin

    s := 0;

    x := 2019;

    while x > 0 do begin

    x := x - 1;

    s := s + 1;

    end;

    write('S= ',s);

    End.

    Протокол:

    S=2019

    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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