2. какие значения получат переменные x, y и z после выполнения программы, если с клавиатуры будут последовательно введены числа 12 и 5: program p; var x, y, z: integer; begin readln (x, y); z: =x*y; write (x, y, z); end.

12560 именно так будет выведен ваш ответ. х=12, у=5, z - их произведение, соответственно 60, но вывод оформлен так, что все числа без разделителей будут напечатаны друг за другом.

// pascalabc.net 3.0, сборка 1157 от 02.02.2016 begin   var a: array[1..20] of integer;   randomize;   for var i: =1 to 20 do a[i]: =random(-50,50); a.println;   var b: =range(2,20,2).select(i-> a[i]);   writeln('элементы с четными индексами по возрастанию');   b.sorted.println;   writeln('элементы с четными индексами по убыванию');   b.sorteddescending.println; end. тестовое решение: -15 46 -34 -3 43 16 -17 -28 -19 12 -28 -11 48 -12 -1 33 -37 9 6 -40 элементы с четными индексами по возрастанию -40 -28 -12 -11 -3 9 12 16 33 46 элементы с четными индексами по убыванию 46 33 16 12 9 -3 -11 -12 -28 -40

// pascalabc.net 3.0, сборка 1157 от 02.02.2016 var   x: integer; begin   for x: =-8 to 8 do writeln(x: 3,sqr(x)-9*x+4: 6)  end. результат  выполнения программы:   -8    140   -7    116   -6      94   -5      74   -4      56   -3      40   -2      26   -1      14   0        4   1      -4   2    -10   3    -14   4    -16   5    -16   6    -14   7    -10   8      -4