1) даны два массива z и r размером k x l, заполненные случайным образом. сформировать массив q, в котором каждый элемент соответствует сумме произведения значений элементов массивов z и r, и числа 10. вывести на экран все массивы. 2) дан двумерный массив а, размерностью м, заполненный случайным образом. заменить в данном массиве все нечетные элементы выше побочной главной диагонали на число с, введенное с клавиатуры. 3) дан двумерный массив d, размерностью м=4,n=6, заполненный случайным образом. найти сумму элементов 2 строки. полученную сумму вывести на экран.

program massive;

uses crt;

const

  k = 3;

  l = 6;

var

  z: array [1..k * l] of integer;

  r: array [1..k * l] of integer;

  q: array [1..k * l] of integer;

  i: integer;

  x: integer;

begin

    randomize;

    x : = k * l;

    for i: = 1 to x do

    begin

      z[i] : = random(20);

      r[i] : = random(10);

    end;

    clrscr;

    writeln('massive z: ');

    for i: = 1 to x do

        write(z[i]: 4);

    writeln;

    writeln('massive r: ');

    for i: = 1 to x do

        write(r[i]: 4);

    writeln;

    for i: = 1 to x do

        q[i]: = z[i] * r[i] + 10;

    writeln('massive q: ');

    for i: = 1 to x do

        write (q[i]: 4);

    readln

end.

Питон:

number = int(input())

number_lenth = len(str(number))

print(number_lenth)

if number % 2 == 0 and number_lenth == 3:

   number /= 4

elif number % 2 != 0 and number_lenth == 2:

   number *= 5

elif number_lenth == 1:

   number *= 100

print(round(number, 3))