• с помощью цикла вывести на экран:1234321

Ответы 1

  • Program Loop;

    Uses Crt;

    var i:integer;

    begin

     

        clrscr;

        for i:=1 to 4 do write(i);

            for i:=3 downto 1 do write(i);

    readkey;

    end.

     

     

     

     

     

     

     

     

     

     

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

Войти через Google

или

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

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

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