Перейти к выбору ответа 02.04.2022мафин и его знаменитый кабачок 10 вопросов пожалуйста Выбрать другой вопрос Смотреть ответ Перейти к выбору ответа Литература Вопрос школьника по предмету Литература мафин и его знаменитый кабачок 10 вопросов пожалуйста Ответ учителя по предмету Литература По тексту?Или по предмету ит.д Просто не понятно
Похожие вопросы от пользователей
2)В ящике лежат белые, красные и чёрные кубики. Всего их 20 штук. Белых кубиков в 6 раз больше,чем чёрных. А красных кубиков меньше,чем белых. Сколько красных кубиков в ящике?
1111+1
1011011010+1011101110
10011*11011
111*11
Уравнения: 1,3 : 3,9 = x : 0,6
х = 5?
и решите пж уравнение:
Х : 1 три пятых = 3 две седьмых : 2 двадцать две тридцатьпятых.
Х чему равен?
Var
p:real ;
i,n, k,g: integer ;
Begin
p:=(a+b+c)/2;
result:=Sqrt(p*(p-a)*(p-b)*(p-c))
End;
Var
a,b,k,q,h,d,x1,x2 , w,c:real;
g:string;
Begin
writeln(‘добро пожаловать в математический помощник!!! как дела?’);
readln(g);
writeln(‘найти корни квадратного уравнения(4) высоту в прямоугольном треугольнике(2) вывести таблицу тригонометрических тождеств(3) воспользоваться формулой Герона(1) ‘);
readln(k);
if k=1 then
Write(‘a = ‘);
ReadLn(a);
Write(‘b = ‘);
ReadLn(b);
Write(‘c = ‘);
ReadLn(c);
WriteLn(‘S = ‘,S(a,b,c));
if k=2 then
writeln(‘введите проекции’);
readln(q,w);
h:=sqrt(q*q+w*w);
writeln(‘высота=’,h);
if k=4 then
Begin
Writeln (‘Введите коэффициенты квадратного уравнения: a,b,c’);
Readln (A,B,C);
D:=B*B-4*A*C;
If D<0 Then Writeln ('Корней нет ')
Else
Begin
X1:=(-B+SQRT(D))/2/A;
X2:=(-B-SQRT(D))/2/A;
Writeln (‘X1=’,X1:8:3,’ X2=’,X2:8:3);
end;
end;
end.
ПОЖАЛУЙСТА ПОМОГИТЕ ОТКОРЕКТИРОВАТЬ И НАЙТИ ОШИБКУ В КОДЕ, ИСПРАВИВ ЕЕ