Сосач помоги!Нужно сделать это дерьмо в паскале, если не сделаю мне рвут задницу.Во имя Саши Скула!
>>148835369 (OP)Ты Сашу-то сюда не приплетай, школьник.
>>148835369 (OP)>мне рвут задницуТрансляцию пили.
>>148835392Шарага четвертый курс, причем тут школа :c
>>148835369 (OP)>если не сделаю мне рвут задницу.Отличный стимул для обучения. Не будешь учиться - порвут жопу.
Тебе тут только за щеку напихают
бухенвальд флавався хуйня
var ha,hb,hc,a,b,c,S,P:real;begin writeln('Vvedite a'); readln(a); writeln('Vvedite b'); readln(b); writeln('Vvedite c'); readln(c); P:=(a+b+c)/2; S:=sqrt(P(P-a)(P-b)(P-c)); ha:=2S/a; hb:=2S/b; hc:=2S/c; writeln('Vysoty treugolnika ravni:'); writeln(ha:8:2,'',hb:8:2,'',hc:8:2);end.
var a,b, max:real;begin writeln('Vvedite a'); readln(a); writeln('Vvedite b'); readln(b); if (sqr(a)>sqr(b)) then begin max:=sqr(a); writeln('N=1'); end; if (sqr(a)<sqr(b)) then begin max:=sqr(b); writeln('N=2'); end;end.