написать программку считающую количество чисел заканчивающихся на 5 и 7 в

Написать программу считающую количество чисел оканчивающихся на 5 и 7 в ряду от 1 до 300

Задать свой вопрос
1 ответ
  1. var
  2.    i, k: integer;
  3. begin
  4.    for i := 1 to 300 do
  5.        if (i mod 10 = 5) or (i mod 10 = 7) then
  6.                k := k + 1;
  7.    
  8.    Writeln('Количество цифр, оканчивающихся на 5 либо 7: ', k);
  9. end.

Ответ

60

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт