Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
nadijagordijenp07vwr
17.09.2021 09:05 •
Информатика
Это нужно сделать в excel, но я даже не знаю, с чего начать. напишите алгоритм выполнения с наглядным объяснением.
👇
Увидеть ответ
Открыть все ответы
Ответ:
Философияна5
17.09.2021
Program n1;
var x,y,n,z,h,C:real;
function arccos(x : real) : real;
begin
arccos := 2 * arctan(sqrt((1 - x) / (1 + x)));
end;
procedure ygls( a,b,c,t: real);
var al,be,ga: real;
begin
al := arccos((sqr(b) + sqr(c) - sqr(a))/(2 * b * c)) * 180 / pi;
writeln('угол A= ',trunc(al));
writeln('угол B= ',trunc(180-al-t));
end;
begin
write('введите сторону а: ');
readln(x);
write('введите сторону b: ');
readln(y);
write('введите угол С: ');
readln(C);
n:=C;
C:=cos(C*180/pi);
z:=sqrt(x*x+y*y-2*x*y*C);
h:=0.5*sqrt(2*(x*x+y*y)-c*c);
ygls(x,y,z,n);
writeln('сторона c: ',trunc(z));
writeln('высота h: ',trunc(h));
writeln('периметр P: ',trunc(x+y+z));
writeln('площадь S: ',trunc(z*h));
end.
4,6
(47 оценок)
Ответ:
16вопрос
17.09.2021
#include <iostream>
using namespace std;
int main()
{
int n,max;
bool a=false;
cout<<"enter kol-vo numbers:"<<endl;
cin>>n;
if(n<=1000)
{
int arr[n];
cout<< "enter 1 chislo"<<endl;
cin>>arr[0];
max=arr[0];
if(arr[0] % 10==3 && arr[0]<30000)
{
a=true;
for (int i=1;i<n;i++)
{
cout<<"enter "<<(i+1)<<" chislo"<<endl,
cin>>arr[i];
if(arr[i]>30000) { break; }
}
for (int i = 0; i < n; ++i) {
if (arr[i] > max && arr[i] % 10==3)
{
max = arr[i];
}
}
}
}
if(a){ cout<<" max chislo okanch na 3: "<< max<<endl; }
return 0;
}
4,6
(83 оценок)
Это интересно:
О
Образование
06.01.2021
Клюква стоит 250 рублей за кг, а малина 200....
О
Образование
16.03.2023
Решить систему уравнений x2 + y2 + xy = 3...
О
Образование
05.08.2020
Решить систему уравнений x2 + xy +y2 = 13...
О
Образование
06.04.2022
В треугольнике АВС проведена биссектриса АК...
О
Образование
11.03.2020
Водитель ехал с постоянной скоростью из города А в город Б...
О
Образование
27.04.2022
Первые 300 км автомобиль ехал со скоростью 60 км/час...
О
Образование
02.06.2023
В треугольнике АВС точка D на стороне АВ...
О
Образование
21.07.2020
Из разных городов, расстояние между которыми 600 км...
О
Образование
29.01.2020
Из пункта А в пункт B, расстояние между которыми 84 км...
Х
Хобби-и-рукоделие
21.02.2021
Правила и техника игры в карточную игру Скорость...
Новые ответы от MOGZ: Информатика
Olgaekolesnik
17.03.2023
1) дан массив а(5) заполненный случайными числами от 0 до 5. посчитать и вывести на экран сумму всех элементов массива. 2) дан массив а(20) заполненный случайными числами....
Dron133
17.03.2023
Буду ! 1).131,21 (в четверичной системе счисления) надо перевести в восьмеричную 2). 765 (в восьмиричной системе) надо перевести в в четверичную 3). 123,13 (в четверичной)...
идьме
17.03.2023
Вычислить среднее арифметическое значение тех элементов одновременного массива, которые в интервал от -2 до 10. размерность массива произвольная. или дан массив, содержащий...
MrLinar
17.03.2023
Файл размером 1024 байта передается через некоторое соединение за 64 миллисекунды. определите время в миллисекундах, за которое можно передать через то же самое соединение,...
мгмлидт
17.03.2023
Перевести в разные системы счисления. 1) 50а,е2(в шестнадцатиричной) перевести в десятиричную систему счисления) 2) 15а(в шестнадцатиричной) перевести в десятиричную...
Ruki2233
28.09.2021
Задача 1. Один символ алфавита весит 4 бита. Сколько символов в этом алфавите? Дано: i=4 По формуле N=2i Найти: N - ? Задача 2. Каждый символ алфавита записан с цифр...
мда28
25.12.2021
класс, объясните что делать и само решение. !...
kobita
29.05.2021
Составьте программу, которая по трем введенным вами числам определит является ли треугольник прямоугольным?...
асель117
20.02.2022
варик хотябы пункт а решите...
gilfanovar01
20.02.2022
Марина собирается лететь в отпуск и хочет сэкономить на билете. Билет на самолёт, включающий провоз багажа, стоит дороже, чем билет без багажа. Но покупая билет без...
MOGZ ответил
Всего бензина было 60 л. в 1 канистре было на 4,8 л. больше чем во...
Ккакому этапу жизни поэта относится стихотворение я очи знал о эти...
Какое однокореное слово у слова мясной...
Боку(на каком? ) на красном - это неправильная запись ? ?...
Система команд для служебной собаки (по аллгаритму)...
Egasring, andomesh, friett, tosotat, woberyes правильно составить...
Переобразуй запись. прочитай. раздели текст на предложения. спиши....
Какая часть речи у слова необыкновенности?...
Вычисли1ч5мин+55мин 1ч-17мин 2ч-45мин 5м-89см...
1.культура- это благо или зло? в чем плюсы и минусы. примеры 2. культура...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
var x,y,n,z,h,C:real;
function arccos(x : real) : real;
begin
arccos := 2 * arctan(sqrt((1 - x) / (1 + x)));
end;
procedure ygls( a,b,c,t: real);
var al,be,ga: real;
begin
al := arccos((sqr(b) + sqr(c) - sqr(a))/(2 * b * c)) * 180 / pi;
writeln('угол A= ',trunc(al));
writeln('угол B= ',trunc(180-al-t));
end;
begin
write('введите сторону а: ');
readln(x);
write('введите сторону b: ');
readln(y);
write('введите угол С: ');
readln(C);
n:=C;
C:=cos(C*180/pi);
z:=sqrt(x*x+y*y-2*x*y*C);
h:=0.5*sqrt(2*(x*x+y*y)-c*c);
ygls(x,y,z,n);
writeln('сторона c: ',trunc(z));
writeln('высота h: ',trunc(h));
writeln('периметр P: ',trunc(x+y+z));
writeln('площадь S: ',trunc(z*h));
end.