Ввести число с клавиатуры. Вычитать от него 1, пока оно не станет равным 0. Все э о в phyton

n = int(input("Число: "))

while n>0:

   n-=1

Объяснение:

евр пыарв куоак оарь  ееврпосбр колелркупроь опавры

Объяснение:

program xxx;

  var i, n, s : integer;

begin

    write('введите число n=');

    readln(n);

    s: =0;

    i: =2;

    while i< =n do

        begin

          s: =s+i;

            i: =i+2

        end;

    write('сумма четных чисел =', s);

    readln

end.

jrjkj rjkf_rjkjrjkf b yf rjkf[_rjkjrjkf