Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Руся20031
31.05.2020 07:50 •
Информатика
Написать программу вычисления суммы модулей двух введенных чисел. в java, с оператором if
Показать ответ
Ответ:
yousei1234
07.12.2021 16:55
Function ArcCos(x:real):real;
var t:real;
begin
t:=ArcTan(Sqrt(1-x*x)/x);
if x<0 then ArcCos:=t+Pi
else ArcCos:=t
end;
var
a,b,c,p,p2,s,alpha,beta,gamma,h:real;
begin
Read(a,b,p);
c:=p-a-b;
p2:=p/2;
s:=sqrt(p2*(p2-a)*(p2-b)*(p2-c));
alpha:=ArcCos((b*b+c*c-a*a)/(2*b*c));
beta:=ArcCos((a*a+c*c-b*b)/(2*a*c));
h:=a*Sin(beta);
alpha:=alpha*180/Pi;
beta:=beta*180/Pi;
gamma:=180-alpha-beta;
Writeln('c=',c);
Writeln('alpha=',alpha:0:2,', beta=',beta:0:2,', gamma=',gamma:0:2);
Writeln('S=',s,', h=',h)
end.
0,0
(0 оценок)
Ответ:
Dashaass554
26.05.2022 04:27
#include <iostream>#include <iomanip>#include <ctime>
using namespace std;
int main(){ setlocale(LC_ALL, "RUSSIAN"); const int N = 10; int arr[N]; int K, L, sum = 0, sumexcl = 0; srand(time(NULL)); for (int i = 0; i < N; i++) { arr[i] = rand() % 10; sum += arr[i]; } cout << "Введите K >> "; cin >> K; cout << "Введите L >> "; cin >> L; for (int i = 0; i < N; i++) { cout << arr[i] << " "; if((i>=K) && (i<=L)) sumexcl += arr[i]; } sum -= sumexcl; cout << "Результат: " << sum << endl; system("pause");}
0,0
(0 оценок)
Популярные вопросы: Информатика
marmakmp
23.06.2020 05:47
Дан целочисленный массив размера n, заполненный целыми числами не превышающими 104. необходимо получить два новых массива: в первом массиве должны быть собраны только...
AndreySolmikov
22.04.2021 23:23
дана последовательность, содержащая от 2 до 50 слов, в каждом из которых от 1 до 8 строчных латинских букв; между соседними словами – пробел, за последним словом – точка....
anigrigoryan01
20.03.2023 22:39
Определите, какое значение принимает выражение (AvB&C), если А= 1, ВО, СОМой ответ...
alexxxxarchenko
04.09.2022 06:23
информатика, даю 40 Периметр квадрата равен 24 см. Площадь квадрата равна Составьте блок-схему алгоритма решения поставленной задачи и дайте краткое пояснение....
lyba228337ggg
15.09.2022 22:03
Укажите основание системы счисления, в которой записьчисла 49 оканчивается на 11...
yana221002
21.11.2020 20:19
Дан алгоритм. восстановите общую формулу для решения которой был написан этот алгоритм. начало f=g-3 x=f^2+f/2 k=x/(x-3) a=2кореньk вывод: a конец...
DSK111
22.04.2021 15:36
Дан одномерный массив. найти элементы, имеющие в своей записи только чётные цифры. сформировать новый массив из элементов с чётными цифрами и указать индекс максимального...
strelkina42
13.11.2021 16:30
Дан двумерный массив. составить программу вычисления среднего арифметического каждой строки. полученные результаты записать в последнюю строку данного массива.(с пояснениями...
zhalamine
09.08.2021 01:44
Запиши в тетради функции кнопок показанных на рисунке 38 страница информатика пятый класс...
Danyabaidak
25.12.2022 15:37
НУЖНО РАЗГАДАТЬ РЕБУСЫ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var t:real;
begin
t:=ArcTan(Sqrt(1-x*x)/x);
if x<0 then ArcCos:=t+Pi
else ArcCos:=t
end;
var
a,b,c,p,p2,s,alpha,beta,gamma,h:real;
begin
Read(a,b,p);
c:=p-a-b;
p2:=p/2;
s:=sqrt(p2*(p2-a)*(p2-b)*(p2-c));
alpha:=ArcCos((b*b+c*c-a*a)/(2*b*c));
beta:=ArcCos((a*a+c*c-b*b)/(2*a*c));
h:=a*Sin(beta);
alpha:=alpha*180/Pi;
beta:=beta*180/Pi;
gamma:=180-alpha-beta;
Writeln('c=',c);
Writeln('alpha=',alpha:0:2,', beta=',beta:0:2,', gamma=',gamma:0:2);
Writeln('S=',s,', h=',h)
end.
using namespace std;
int main(){ setlocale(LC_ALL, "RUSSIAN"); const int N = 10; int arr[N]; int K, L, sum = 0, sumexcl = 0; srand(time(NULL)); for (int i = 0; i < N; i++) { arr[i] = rand() % 10; sum += arr[i]; } cout << "Введите K >> "; cin >> K; cout << "Введите L >> "; cin >> L; for (int i = 0; i < N; i++) { cout << arr[i] << " "; if((i>=K) && (i<=L)) sumexcl += arr[i]; } sum -= sumexcl; cout << "Результат: " << sum << endl; system("pause");}