Всегда ли равны выражения (x + y) + y, x + (y * 2.0) для произвольных вещественных переменных x, y типа double?

Правильный ответ:

• # Рассмотрим следующий фрагмент программы: #include <string.h> #include <сtype.h> . . . int n, i; char a[32]; strcpy(a, "375e10"); n = 0; i = 0; while (a[i] != 0) { if (isdigit(a[i]) && a[i] < '8') { n *= 8; n += a[i] - '0'; } else { break; } ++i; } Чему будет равно значение переменной n в результате выполнения этого фрагмента?
• # Даны очередь и стек элементов одного и того же типа. Можно ли написать программу, которая удаляет из очереди предпоследний элемент и не меняет порядка остальных элементов? При этом разрешается использовать стек как вспомогательную структуру данных; другими структурами (за исключением простых переменных) пользоваться запрещено.
• # Есть ли ограничение на длину текстовой строки в языке Паскаль?
• # Что вычисляет следующий фрагмент программы? вещ последовательность p; вещ a, s; цел n; . . . s := минус бесконечность; n := 0; встать в начало последовательности p; цикл пока есть непрочитанные элементы в посл-ти p | прочесть очередной элемент посл-ти p в (вых: a); | если a > s | | то | | s := a; n := 1; | иначе если a == s | | то | | n := n + 1; | конец если конец цикла ответ := n;
• # Рассмотрим следующий фрагмент программы: цел m, n; . . . дано: m >= 0 и n >= 0 цел a, b, c; a := m; b := n; c := 1; цикл пока a != 0 и b != 0 | если a четное и b четное | | то a := a / 2; | | b := b / 2; | | c := c * 2; | иначе если a четное | | то a := a / 2; | иначе если b четное | | то b := b / 2; | иначе | | если a > b | | | то a := a - b; | | | иначе b := b - a; | | конец если | конец если конец цикла ответ := c * (a + b); Какое условие является инвариантом цикла? (Через НОД и НОК обозначены наибольший общий делитель и наименьшее общее кратное.)