• Напишите программу. Найти количество трехзначных чисел, которые оканчиваются на 1 и на 3.

Ответы 2

  • Пишу на QBasicCLSFOR I = 100 TO 999IF (I MOD 10 = 3) OR (I MOD 10 = 1) THENK=K+1END IFNEXT I PRINT K 
    • Автор:

      hilarión
    • 5 лет назад
    • 0
  • паскальvar i,k:integer;begink:=0;FOR I: = 100 TO 999IF (I MOD 10 = 3) OR (I MOD 10 = 1) THEN K=K+1;write(k);end.
    • Автор:

      noelr4dg
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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