Блог для маленьких школьников и их родителей
ШколаЛа
19
Июль

Пожалуйста, сделайте на pascal

Автор: jannaaa1969
Предмет: Информатика
Уровень: 5 - 9 класс

Пожалуйста, сделайте на pascal

Ответов к вопросу: 1
  • amiraev123
    19.07.2024 | 14:28

    Ответ:
    begin

      var n := ReadInteger();

      var n1 := 10;

      for var i := 2 to n do

         n1 += i mod 2;

      var res := n.IsOdd ? n1 div 10 : n1 mod 10;

      print(res)

    end.
    Объяснение:

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.

Задача по Пожалуйста, сделайте на pascal для школьников 5 - 9 класс. Узнайте решение и получите подробное объяснение по теме Информатика. Ответы на этот вопрос уже опубликованы. Не забывайте, что вы можете задать вопрос или поделиться собственным решением, став экспертом для других!