Вычислить площадь треугольника со сторонами k и прилежащими углами a и b

Var   k, a, b: real; begin   readln(k, a, b);   writeln('s = ', 0.5 * sqr(k) * ((sin(a / 180 * pi) * sin(b / 180 * pi)) / sin((180 - a - b) / 180 * ; end.

Решение: а) . номера страниц идут от 1 до 64. страницы на двойных листах нумеруются так: 1-й – 1, 2, 63, 64; 2-й – 3, 4, 61, 62; ………………..; 16-й – 31, 32, 33, 34. б) . так как в последовательности, которую номера страниц двойного листа, суммы чисел, равноотстоящих от концов, одинаковы (1+64, 2+63 – 1-й лист; 3+62, 4+61 – 2-ой лист; ………………………..; 31+34, 32+33 – 16-й лист) , а именно 65, то сумма чисел на любом двойном листе (65+65=130) одна и та же. значит, нельзя указать двойного листа, у которого сумма чисел, обозначающая номера страниц наибольшая. ответ: такого двойного листа в журнале нет. надеюсь : )

Поскольку по условию непонятно, на каком языке написана строка, то я написал программу, заменяющую "а" на "о". если на другом языке - то программу можно uses crt; var i : integer;       s, snew : string; begin  clrscr;     write ('s = '); readln(s);     snew : = '';   for i: =1 to length(s) do     if s[i]='a' then snew: =snew+'o'                    else snew: = snew+s[i];     writeln (s);     writeln (snew);   readln; end.