Надо даны три положительных числа a b c проверить будут ли они сторонами треугольника. если да, то вычислить площадь этого треугольника.через структурное ветвление.

163

236

Посмотреть ответы 2

Ответы на вопрос:

dhcf12

Информатика

4,7(64 оценок)

Паскаль var a,b,c,p: real; begin readln(a,b,c); if (a< b+c)and(b< a+b)and(c< a+b)then begin writeln('да'); p: =(a+b+c)/2; writeln('площадь: ',sqrt(p*(p-a)*(p-b)*(p-c)); end else writeln('нет'); end. можно и на другом языке

01041

Информатика

4,5(82 оценок)

Var timeout,timein,traintype: string; n: integer; begin writeln('vvedite nomer poezda'); readln(n); case n of 1: begin timeout: ='8.00'; timein: ='8.40'; traintype: ='passagirskiy'; end; 2: begin znachenija end; i tak dalee end; end.