Var r,alfa,beta,gamma,a,b,c:real; begin write('R = '); readln(r); writeln('alfa,beta,gamma:'); readln(alfa,beta,gamma); a:=2*r*sin(alfa*pi/180); b:=2*r*sin(beta*pi/180); c:=2*r*sin(gamma*pi/180); writeln('a = ',a:4:2,' b = ',b:4:2,' c = ',c:4:2); end.
Пример: R = 2.5 alfa,beta,gamma: 36.87 53.13 90.0 a = 3.00 b = 4.00 c = 5.00
alisapavlushina
09.02.2020
//PascalABC.NET версия 3.2, сборка 1389 //Если программа не запускается, то обновите версию uses System.Linq; begin begin writeln('I'); var n := ReadInteger('n='); Writeln((1 + 1 + Power(2, n - 1)) * n / 2); end;
begin writeln; writeln('II'); var n := ReadInteger('n='); Writeln(n mod 11 = 0 ? 'YES' : 'NO');
end;
begin writeln; writeln('III'); var a := ReadArrInteger('Документы', ReadInteger('n=')).ToList; writeln;
while a.Any() do begin write(a[0], ' '); a.RemoveAt(0); if not a.Any then break;
write(a.Last, ' '); a.RemoveAt(a.Count - 1); if not a.Any then break;
var n := 0; if a.Count > 1 then n := a.Count div 2 - 1; write(a[n], ' '); a.RemoveAt(n); end; end; end.
asi19776
09.02.2020
Была суббота, но Вася шёл в школу. По дороге он встретил своего друга Митю, который предложил сходить в кино, потому что по субботам не учился и был свободен. 1) Вася отказал сходить в кино, потому что не хотел лишний раз прогуливать школу, но договорился с Митей на воскресенье. К тому же Вася хотел исправить двойку по русскому. "Как знаешь" - ответил Митя. В школе одноклассник Васи Лёша предложил ему поиграть в мячик в коридоре, всё равно ведь делать нечего. -Да он же маленький, теннисный! Нам ничего не будет! 1. Вася отказался от этой затеи. Он пошёл в класс и стал повторять правило и на уроке исправил свою двойку, ответив на отлично. А Лёша разбил мячиком лампу и его вызвали к директору. 2. Вася согласился. Всё равно на перемене было нечего делать. Мальчики весело играли, несколько раз попали в проходящих мимо ребят, и вдруг Лёша попал мячиком в лампу. Она разбилась. Мальчиков вызвали к директору, и после обещаний поговорить с родителями и уличительной беседы водворили на урок. После таких событий мальчики всё забыли и получили ещё по двойке. 2) Вася согласился. Он так давно не видел Митю! К тому же, в хорошую, солнечную погоду так не хотелось идти в школу. Мальчики пошли в кино и по дороге заметили ларёк с мороженым. Вот бы по мороженке! Жаль, что у меня денег нет на мороженое, только на билеты хватит, - сказал Митя. Вася тоже хотел мороженое, да и Митю бы угостил. У него были деньги, но на подарок маме на 8 марта. На другое ему нельзя было их тратить. 1. Вася решил не тратить эти деньги. Он сказал Мите, что у него денег совсем нет и ребята пошли в кино. Они благополучно посмотрели фильм. Вася поругали, за то, что он не пошёл в школу, но двойку он исправил в понедельник. 2. Вася решил - гулять так гулять! Он купил себе и Мите по мороженому, после чего сумма в его кошельке заметно уменьшилась. После этого мальчики пошли смотреть кино. С удовольствием насладившись фильмом, Вася зашёл и за подарком маме. Он исправил двойку в понедельник, а своё отсутствие в школе объяснил родителм тем, что ходил в магазин.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Треугольник задан величинами своих углов и радиусом описанной окружности. найти стороны треугольника.
begin
write('R = ');
readln(r);
writeln('alfa,beta,gamma:');
readln(alfa,beta,gamma);
a:=2*r*sin(alfa*pi/180);
b:=2*r*sin(beta*pi/180);
c:=2*r*sin(gamma*pi/180);
writeln('a = ',a:4:2,' b = ',b:4:2,' c = ',c:4:2);
end.
Пример:
R = 2.5
alfa,beta,gamma:
36.87 53.13 90.0
a = 3.00 b = 4.00 c = 5.00