• Подсчитать количество положительных четных элементов числового ряда от 555 до 765

Ответы 1

  • В Паскале за целочисленное деление отвечает оператор div . При использовании оператора div дробная часть будет отброшена.

    С оператором mod при делении с остатком в результате отбрасывается как раз целая часть.

    Program Primer1;Var i, k: integer;begin k:= 0; for i:= 555 to 765 do { в данном цикле счет начинается от 555 до 765 } begin if (i mod 2 =0) then k:= k + 1;{если число четное, то остаток от деления равен 0, поэтому считаем} end; writeln(k); end.

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

Войти через Google

или

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

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

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