М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
stas2491
stas2491
16.05.2021 05:13 •  Информатика

1. в прямоугольном треугольнике известны катет и гипотенуза(ввод с другой катет. 2.для расчета функции z=x2-квадратный корень из y+15,7*x x ввод с клавиатуры.

👇
Ответ:
Andromeda123464
Andromeda123464
16.05.2021
Var x,y,z:real
begin
writeln('Введите катет: ');
readln(x);
writeln('Введите гипотенузу: ');
readln(y);
z:=sqrt(sqr(y)-sqr(x));
writeln('Катет равен', z);
end.

2.
var a,b,c,d:real;
begin
writeln('Введите число x: ');
readln(a);
writeln('Введите число y:');
readln(b);
c:=sqr(a);
d:=sqrt(b+15.7*b);
writeln('Из формулы z=x2, z=', с);
writeln('Из формулы кв. корень(y+15.7*x)=', d);
end.
//че офигел так сложно писать? Я твое второе задание вообще не понял
4,6(26 оценок)
Открыть все ответы
Ответ:

При перемещении выделенная область растрового изображения или объект в векторном рисунке удаляются, а их копия помещается в буфер обмена. Затем копия из буфера обмена помещается в область рисования и перетаскивается мышью в нужное место растрового изображения или векторного рисунка.

При удалении выделенная область растрового изображения или объект в векторном рисунке просто удаляются.

При копировании сначала выделяется область растрового изображения или объект в векторном рисунке. Затем копия выделенной растровой области или векторного объекта помещается в специальную область памяти операционной системы, которая называется буфером обмена. Наконец, копия из буфера обмена помещается в область рисования и перетаскивается мышью в нужное место растрового изображения или векторного рисунка.

4,6(74 оценок)
Ответ:
саня30970
саня30970
16.05.2021
Периметр прямоугольника: P=2(a+b). Площадь: S=ab
Косинусы углов в треугольнике:
cosA=(b²+c²-a²)/(2bc); cosB=(a²+c²-b²)/(2ac); cosC=(a²+b²-c²)/(2ab)

var
  a,b:real;
begin
  Write('Введите a,b: ');
  Read(a,b);
  Write('P=',2*(a+b),', S=',a*b)
end.

Тестовое решение
Введите a,b: 12.2 8
P=40.4, S=97.6

var
  a,b,c,cosA,cosB,cosC:real;
begin
  Write('Введите a,b,c: ');
  Read(a,b,c);
  cosA:=(b*b+c*c-a*a)/(2*b*c);
  cosB:=(a*a+c*c-b*b)/(2*a*c);
  cosC:=(a*a+b*b-c*c)/(2*a*b);
  Write('cosA=',cosA,', cosB=',cosB,', cosC=',cosC)
end.

Тестовое решение
Введите a,b,c: 15.3 8 14.2
cosA=0.138864436619718, cosB=0.855495719414526, cosC=0.393995098039216
4,5(28 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ