Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
lex9090
22.06.2020 06:04 •
Информатика
Робот находится на входе в коридор. в коридоре имеются тупики сверху и снизу неизвестной длины. длина коридора также неизвестна. написать алгоритм закрашивания всех тупиков и выхода из коридора. сделать в программе кумир
Показать ответ
Ответ:
Вишенка011
18.05.2020 09:18
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.
0,0
(0 оценок)
Ответ:
Маргарин11
26.11.2020 09:36
#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;
}
0,0
(0 оценок)
Популярные вопросы: Информатика
bananxhik
01.03.2020 13:16
Получить строку состоящую из восьми символов _...
sashokko
01.03.2020 13:16
Сформируйте массив, содержащий 15 элементов с датчика случаных чисел; получите новый массив, каждый элемент которого равен разности квадрата и самого соответствующего...
Hyun79
21.02.2021 03:40
1. Программа состоит из 2. Главные устройства компьютера3. Функциями памяти и процессора4. Минимальный набор устройств, которые необходимы для удобной работы компьютера5....
МиланаЖиза
01.05.2023 11:27
Вагон массой 20 т, движущийся со скоростью 0,3 м/с, нагоняет вагон массой 30 т, движущийся со скоростью 0,2м/с. Какова скорость вагонов после взаимодействия, если...
Alchimick
19.03.2020 16:40
. Из выделенного текста выпишите 6 предложений с подлежащим и сказуемым...
halker249Neekolay
29.12.2020 17:50
Два мотоциклиста выехали одновременно в противоположных направлениях. Они были в пути 4 часа и проехали 800 км. Найди скорость второго мотоциклиста, если первый...
Акжан1111111
05.01.2021 10:05
Әже туралы эссе көмек керек...
abdrahmanovamir123
23.12.2021 05:39
РАБОТА С ФИЗИЧЕСКОЙ КАРТОЙ АФРИКИ. По физической карте Африке занесите в таблицу недостающие данные. п/п Название формы рельефа Название высшей Абсолютная высота...
speedoflight3
22.03.2023 19:31
, в некотором тепловом процессе давление одноатомного идеального газа зависит от объема по закону: P(V) =- p1/V1 * V + p2 , где p1 = 2 атм , p2 = 6 атм, V1 = 1 м3Найдите...
kozaksolomia1
16.11.2020 17:07
Один из углов параллелограмма равен 108°. Найдите меньший угол этого параллелограмма. ответ дайте в градусах...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
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.
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;
}