1)Напишите программу, которая считает количество четных цифр введенного числа 2) Напишите...

Question

1)Напишите программу, которая считает количество четных цифр введенного числа 2) Напишите программу, которая вводит с клавиатуры натуральное число N и определяет его факториал, т.е. произведение натуральных чисел от 1 до N: N!=1×2×3×...×N. Что будет, если ввести большое значение N (например, 20)? 3) Напишите программу, которая вводит натуральные числа A и N и вычисляет A^N.

Answer 1

1)
var
  a, b: integer;

begin
  readln(a);
  foreach e: char in a.ToString() do //Проходит по каждому символу в строке, полученной путём преобразования числа
    if (Byte.Parse(e) mod 2 = 0) then
      inc(b); //Увеличивает значение на 1
  writeln(b);
end.
====================== 2 в файле
3)
var
  a, n: integer;

begin
  readln(a, n);
  writeln(power(a, n)); //power возводит число в указанную степень
end.