Register

OR

Do you already have an account? Login

Login

OR

Don't you have an account yet? Register

Newsletter

Submit to our newsletter to receive exclusive stories delivered to you inbox!

Найти количество трёхзначных чисел, кратных 5 и не превосходящих заданного числа N.

Входные данные:
в первой строке одно целое число N, (100

более месяца назад
Просмотров : 44    Ответов : 1   

Лучший ответ:

//Pascal ABC.NET v3.1 сборка 1219

begin
 Var b:=ReadInteger();
 writeln(range(100,999).Where(x -> x x mod 5=0).Count);
end.

Пример ввода:
128
Пример вывода:
6

более месяца назад
Ваш ответ:
Комментарий должен быть минимум 20 символов
Чтобы получить баллы за ответ войди на сайт





Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров и нажмите кнопку Просмотр анимации.


Другие вопросы: