N=8 в задании, насколько я понимаю, означает решение для восьмибитного представления данных, т.е. для случай, когда левый бит отводится под знак (0 - плюс, 1 - минус), а семь правых битов используются для представления числа. Отрицательное число представляется в дополнительном коде, т.е. нули заменяются единицами (и единицы - нулями), а потом в младшем разряде к полученному числу прибавляется единица. Вначале перевод. -13(10)=-0001101(2) Инвертируем биты: 1110010 Прибавляем единицу: 1110011 И дописываем слева 1 в качестве знака. 1 1110011 Аналогичным образом поступаем и с числом -7: -7(10)=-0000111(2) Инвертируем биты: 1111000 Прибавляем единицу: 1111001 И дописываем слева 1 в качестве знака. 1 1111001 Теперь сложение. Выполняем его в столбик для всех восьми бит. 11110011 + 11111001
11101100 У нас при сложении появилась единица переноса из левого разряда, но дальше уже разрядов нет и она просто отбрасывается. Результат получился с единичным знаковым разрядом. Поэтому для получения величины результата поступаем в обратном порядке: отделяем семь правых бит, вычитаем единицу и снова инвертируем полученное значение. Вместо единичного знакового разряда приписываем числу знак минус. 1101100 - 1 = 1101011. Инверсия: 0010100, результат -10100(2)=-20(10)
1)
begin
var (f, m) := readinteger2;
var s := 4 * sqr(f) - sqrt(25) + 12 * m;
write(s);
end.
2)
begin
var (z, h, n) := readinteger3;
var v := (2 * sqr(z) - 13) / (5 * h - 10) + abs(n - 25);
write(v);
writeln('Выполнил: ВАШЕ ФИО');
end.
Объяснение:
sqr(x) - возводит число х в квадрат;
sqrt(x) - вычисляет квадратный корень из числа x;
abs(x) - вычисляет модуль числа х.
1)
begin // Начало программы
var (f, m) := readinteger2; // Считываем с клавиатуры значения f и m
var s := 4 * sqr(f) - sqrt(25) + 12 * m; // Вычисляем выражение
write(s); // Выводим ответ
end. // Конец программы
2)
begin // Начало программы
var (z, h, n) := readinteger3; // Считываем с клавиатуры значения z, h и n.
var v := (2 * sqr(z) - 13) / (5 * h - 10) + abs(n - 25); // Вычисляем выражение
write(v); // Выводим ответ
writeln('Выполнил: ВАШЕ ФИО'); // Здесь вводите свое ФИО
end. // Конец программы