9. Дан фрагмент электронной таблицы. Определите значения в ячейках C2 и С3 после копирования в них формулы из ячейки С1. *□С2 = 165, С3 = 170□С2 = 175, С3 = 180□С2 = 100, С3 = 105□С2 = 100, С3 = 180​

C2=165 C3=170

Объяснение:

   class Program

   {

       static void Main(string[] args)

       {

           int a = int.Parse(Console.ReadLine());

           int b = int.Parse(Console.ReadLine());

 

           int x = int.Parse(Console.ReadLine());

           int y = int.Parse(Console.ReadLine());

           int z = int.Parse(Console.ReadLine());

 

           if (x <= a && y <= b || y <= a && x <= b ||

               x <= a && z <= b || z <= a && x <= b ||

               z <= a && y <= b || y <= a && z <= b)

               Console.WriteLine("Пройдет");

           else

               Console.WriteLine("Не пройдет");

 

           Console.ReadKey();

       }

   }

Объяснение:

.

Задача 1:

var x:longint;

   i,c,sum:integer;

begin

   c:=0;

   sum:=0;

   write('Введите число: '); readln(x);

   while x <> 0 do begin

       i:=x mod 10;

       x:=x div 10;

       

       if i mod 2 = 0 then begin

           c:=c+1;

           sum:=sum+i;

       end;

   end;

   if c > 0 then write('Среднее арифметическое всех чётных чисел равно: ', sum/c:0:2)

   else write('Чётных цифр нет!');

end.

Задача 2:

var x,y,sum:integer;

begin

   sum:=0;

   y:=0;

   while True do begin

       write('Введите число: '); readln(x);

       if x = 0 then break

       else if abs(x-y) > sum then sum:=abs(x-y);

       y:=x;

   end;

   write(sum);

end.