Отыскать количество двузначных чисел оканчивающихся на 7. Составить программку в Pascal.

Отыскать количество двузначных чисел заканчивающихся на 7. Составить программку в Pascal.

Задать свой вопрос
2 ответа
Var count, i: integer;
begin
  count := 0;
  for i := 10 to 99 do
    if i mod 10 = 7 then
      count := count + 1;
  writeln(count);
end.
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

begin
  Range(17,99,10).Count.Println
end.

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


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

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

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

Войти на сайт