Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
vektar1234
13.03.2020 21:26 •
Информатика
10. Что такое метод координат? Расскажите о нём. Как метод коорди- нат применяется в географии? Где вы сталкиваетесь с методом координат в
быту? Приведите примеры.
Показать ответ
Ответ:
ocreater
07.06.2023 21:15
//искать угол будем по теореме косинусов
Program n1;
var x,y,z:real;
function arccos(x : real) : real; {это понадобится для теор. кос.}
begin
arccos := 2 * arctan(sqrt((1 - x) / (1 + x)));
end;
procedure ygl( a,b,c: real); {процедура для удобства}
var ga: real;
begin
ga:=arccos((sqr(a) + sqr(b) - sqr(c))/(2 * a* b)) * 180 / pi; {сама теор. кос.}
writeln('угол С= ',ga:5:2);
end;
begin
write('введите сторону а: ');
readln(x);
write('введите сторону b: ');
readln(y);
write('введите сторону c: ');
readln(z);
if(x>=y+z)or(y>=x+z)or(z>=x+y)then writeln('Это не треугольник')
else if x*x+y*y=z*z then {теорема пифагора}
writeln('Это прямоугольный треугольник')
else if (x*x+y*y>z*z)and(x*x+z*z>y*y)and(z*z+y*y>x*x)
then
begin
writeln('Это остроугольный треугольник');
ygl(x,y,z); {вызываем процедуру}
end
else
begin
writeln('Это тупоугольный треугольник');
ygl(x,y,z);
end;
end.
0,0
(0 оценок)
Ответ:
Shvabra335
13.01.2022 09:02
1)
20480 * 40 = 819200 (Всего передано данных в битах за 40с)
819200 / 8 = 102400 (Перевели в байты)
102400 / 1024 = 100 (Перевели в кБайты)
ответ: 100 Кбайт
2)
64 / 8 * 1024 = 8192 (Скорость модема Байт/сек)
16 * 60 = 960 (переводим 16 минут в секунды)
8192 * 960 = 7864320 (Передано в байтах за 16 мин)
7864320 / 1024 / 1024 = 7,5
ответ: 7,5 Мбайт
3)70 / 8 * 1024 = 8960 (Скорость модема Байт/сек)
280 * 1024 = 286720 (Объем файла в байтах)
286720 / 8960 = 32
ответ: 32 секунды
4)6,25 * 1024 * 1024 = 6553600 (Объем данных в байтах)
6553600 * 8 = 52428800 (Объем в битах)
52428800 / 1024 / 1024 = 50
ответ: 50 Мбит/сек
0,0
(0 оценок)
Популярные вопросы: Информатика
fira2010f
26.04.2020 13:53
Воин со щитом старше воина с автоматом да или нет.2)воин со щитом выше воин а с автоматом.3)воин со щитом сильнее воина с автоматом.4)воин с автоматом умнее воина со щитом...
Joyli67
26.04.2020 13:53
Известны результаты трех участников по прыжкам в длину. определить результат победителя. pascal abc...
femjimin
20.07.2020 12:15
Вчем состоит различие между языком разметки гипертекста и языками программирования?...
lapysh1995
09.09.2021 15:32
Паскаль: 1. составить программу вычисляющую площадь кольца, заключенного между радиусами r1 и r2...
данил20888
03.11.2022 23:26
Определите, встречается ли заданная цифра в числе, введенном с клавиатуры. кратно ли это число заданной цифре?...
fffffffhhhhhh
03.11.2022 23:26
Pascal. составьте программу для определения принадлежности точки p с координатами (x, y) области, которая образована первой дугой синусоиды и осью ох....
гулллллл
02.01.2020 12:03
(excel ) постройте таблицу значений функции, например y = sin (x). указания: при построении таблицы обратите внимание на правильный выбор шага изменения значений аргумента....
okcanaceninap06wvq
28.06.2021 16:35
1. чему равен арифметический порядок числа в десятичной системе счисления, если его внутреннее представление в формате с плавающей точкой – 45е18000?...
жасик0071
28.06.2021 16:35
Какой объем дисковой памяти в мегабайтах займут 5 минут стереозвука при параметрах оцифровки: частота дискретизации 22 кгц, квантование – 8 бит? какой объем дисковой памяти...
MrArt1k01
02.09.2021 08:50
1. на трех заводах «альфа», «плутон» и «рубин» иногда происходят аварии. разместить сведения о количестве аварий на рабочем листе. в диапазоне в7: d10 получить процент аварий,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Program n1;
var x,y,z:real;
function arccos(x : real) : real; {это понадобится для теор. кос.}
begin
arccos := 2 * arctan(sqrt((1 - x) / (1 + x)));
end;
procedure ygl( a,b,c: real); {процедура для удобства}
var ga: real;
begin
ga:=arccos((sqr(a) + sqr(b) - sqr(c))/(2 * a* b)) * 180 / pi; {сама теор. кос.}
writeln('угол С= ',ga:5:2);
end;
begin
write('введите сторону а: ');
readln(x);
write('введите сторону b: ');
readln(y);
write('введите сторону c: ');
readln(z);
if(x>=y+z)or(y>=x+z)or(z>=x+y)then writeln('Это не треугольник')
else if x*x+y*y=z*z then {теорема пифагора}
writeln('Это прямоугольный треугольник')
else if (x*x+y*y>z*z)and(x*x+z*z>y*y)and(z*z+y*y>x*x)
then
begin
writeln('Это остроугольный треугольник');
ygl(x,y,z); {вызываем процедуру}
end
else
begin
writeln('Это тупоугольный треугольник');
ygl(x,y,z);
end;
end.
20480 * 40 = 819200 (Всего передано данных в битах за 40с)
819200 / 8 = 102400 (Перевели в байты)
102400 / 1024 = 100 (Перевели в кБайты)
ответ: 100 Кбайт
2)
64 / 8 * 1024 = 8192 (Скорость модема Байт/сек)
16 * 60 = 960 (переводим 16 минут в секунды)
8192 * 960 = 7864320 (Передано в байтах за 16 мин)
7864320 / 1024 / 1024 = 7,5
ответ: 7,5 Мбайт
3)70 / 8 * 1024 = 8960 (Скорость модема Байт/сек)
280 * 1024 = 286720 (Объем файла в байтах)
286720 / 8960 = 32
ответ: 32 секунды
4)6,25 * 1024 * 1024 = 6553600 (Объем данных в байтах)
6553600 * 8 = 52428800 (Объем в битах)
52428800 / 1024 / 1024 = 50
ответ: 50 Мбит/сек