• вывести на экран в интервале от А до 6 все числа кратные 5

Ответы 1

  • BEGIN

     

    write('Введите а');readln(a);

        for a to 6 do

          if a mod 5 = 0 then writeln(a,' \ ');

     

    readln

    END

     

     

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

Еще вопросы

Войти через Google

или

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

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

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