это Паскаль

Переменной a присвоено значение 5. Установите соответствие:

Write(‘a’) - 1) 5

Write(a) - 2) a

Write(‘a=’, a) - 3) a=5

не шарю в англисском  зато стихи читаю вот тебе мой стих стоит статуя там нету продолжишь сам

Объяснение:

3 носка,т.к. среди них точно есть пара(в числе 3 есть число 2)

program xxx;

    var i, n : integer;

                a, d : real

                      s: array[1..20] of real;

begin

    write('введите n-');

    readln (n);

    write('введите а=');

    readln(a);

    write('введите d=');

    readln(d);

    s[1]: =a;

    for i: =2 to n do

        s[i]: =a+d;

    write('арифметическая прогрессия: ');  

    for i: =1 to n do

              write(s[i]);

end.