Люди шарящие за информатику ответьте на мой предпоследний вопрос
Там
Это очень нужно :(
И да, ответ на это заберите как халяву

S:=1; - переменной s присваивается начальное значение 1
for i := 10 to 99 do  - начало цикла с параметром, i - параметр цикла, 10 - начальное значение параметра, 99 - конечное значение параметра. Т.е. цикл будет выполняться 90 раз, параметр i будет принимать последовательно значения 10, 11, 12, ..., 99.
if (i mod 13 = 0) and (i mod 2 <> 0) then  - условный оператор. В условии используется операция mod - определение остатка от целочисленного деления. (i mod 13 = 0) - это условие будет выполняться для чисел, которые делятся на 13 без остатка; (i mod 2 <> 0) - это условие будет выполняться для чисел, которые делятся на 2 с остатком (это нечетные числа). Таким образом, условие (i mod 13 = 0) and (i mod 2 <> 0) будет иметь значение true для нечетных чисел, которые делятся на 13 без остатка (это 13, 39, 65, 91).
Программа в целом вычисляет произведение нечетных чисел, которые делятся на 13 без остатка. 
(В программе есть ошибка. Тип переменной s должен быть integer.)

namespace ConsoleApp1

{

   class Program

   {

       static void Main(string[] args)

       {

           int n= Int32.Parse(Console.ReadLine());

           int k=0;

           int m=1;

           int z;

           if (n==1)

           {

               Console.WriteLine(0);

           }

           else

           {

               if (n==2)

               {

                   Console.WriteLine(1);

                   

               }

               else

               {

                   for (int i = 0; i < n-2; i++)

                   {

                       z = m;

                       m += k;

                       k = z;

                       

                   }

                   Console.WriteLine(m);

               }

           }

       }

   }

}