Выяснить, чему будет равен остаток от деления 2 в степени N на 10? - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Условие задачи - Чему будет равен остаток от деления 2 в степени N на 10? Входные данные Дано единственное неотрицательное число 0 ≤ N ≤ 10 в степени 9. Выходные данные Выведите ответ на задачу. НАПРИМЕР : введено 3 , ответ 8 . Введено 9 , ответ 2 etc Вот мой код , по моему мнению все работает отлично . Но отсылаю на тест и заваливаюсь на первом же тесте . И не могу понять почему ?
Сам ресурс : http://codeforces.com/gym/100924/problem/A

Решение задачи: «Выяснить, чему будет равен остаток от деления 2 в степени N на 10?»

textual
Листинг программы
var
  b: integer;
  N: int64;
begin 
   readln(N);  
   b := 1;
    if N > 0 then 
    begin
      b := N mod 4;
      case b of
        0: b := 6;
        1: b := 2;
        2: b := 4;
        3: b := 8;
      end;
    end;    
  writeln(b);      
end.

Объяснение кода листинга программы

  1. Ввод значения переменной N с помощью функции readln().
  2. Присваивание переменной b значения 1.
  3. Проверка условия N > 0.
  4. Вычисление остатка от деления N на 4 и присвоение этого значения переменной b.
  5. Использование конструкции case для определения значения переменной b в зависимости от ее текущего значения.
  6. Вывод значения переменной b с помощью функции writeln().

Оцени полезность:

14   голосов , оценка 3.714 из 5
Похожие ответы