Var a:integer;S,p:real;beginWrite('Введите a сторону треугольника'); Readln(a);P:=3*a; Writeln('Периметр=',P);S:=(sqr(a)*sqrt(3))/4; Writeln('Площадь', S);Readln;end.

0 0

4 года назад

Вычислить площадь перомиды Pascal ABCПОМОГИТЕ ПЛИЗ

pavel1984 [324]

Площадь поверхности правильной пирамиды через апофему
L - апофема (опущенный перпендикуляр OC из вершины С, на ребро основания АВ)
P - периметр основания
So - площадь основания

var
L, P, So: real;
begin
readln(L, P, So);
writeln('S = ', 0.5 * P * L + So);
end.

0 0

4 года назад

СРОЧНО! Язык прогнозирования- это А) формальный язык В) естественный язык С)школьный алгоритмический язык Д)словесное описание

Julies [619]

А) формальный язык это

0 0

4 года назад

Запишите в обычном виде: а)sqr(x+y) б)sqr(sin(alf)) в)х+1\sqr(x)\(sqrt(x) г)a*n*n*m\sqr(m-2)

хусрав0111

Решение - в прилагаемом файле.

0 0

4 года назад