Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
Angelina27609
22.10.2021 02:03 •
Информатика
1Составить алгоритм для решения задачи : вычислить сторону треугольника, если известны две другие стороны и угол между ними.
👇
Увидеть ответ
Открыть все ответы
Ответ:
pollyholly123
22.10.2021
Var
mas: array[1..7] of integer;
k, i, MAX:integer;
Begin
for i:=1 to 7 do
Begin
writeln('Введите число');
readln(mas[i]);
end;
MAX:=mas[1];
k:=1;
for i:=2 to 7 do
Begin
if mas[i] > MAX
then
Begin
MAX:=mas[i];
k:=1;
end
else
if MAX=mas[i]
then k:=k+1;
end;
writeln();
writeln('Максимальное значение = ', MAX);
writeln('Количество элементов = ', k);
readln();
end.
4,8
(1 оценок)
Ответ:
liliyaabramova1
22.10.2021
задача 1.
a=input().split()
f=-1
for i in range(len(a)):
if int(a[i])>0 and int(a[i])%2==0:
if f==-1:
min1=int(a[i])
max1=int(a[i])
f=1
elif int(a[i])>max1:
max1=int(a[i])
elif int(a[i])<min1:
min1=int(a[i])
if f==-1:
print('not solution')
else:
print('max=',end='')
print(max1)
print('min=',end='')
print(min1)
задача 2.
a=input().split()
k=0
max1=float(a[0])
for i in range(len(a)):
if float(a[i])==max1:
k+=1
elif float(a[i])>max1:
k=1
max1=float(a[i])
print(k)
задача 3.
a=input().split()
min1=float(a[0])
min2=float(a[0])
min3=float(a[0])
for i in range(len(a)):
if float(a[i])<min1:
min3=min2
min2=min1
min1=float(a[i])
elif float(a[i])<min2:
min3=min2
min2=float(a[i])
elif float(a[i])<min3:
min3=float(a[i])
print(min1)
print(min2)
print(min3)
4,8
(12 оценок)
Это интересно:
К
Кулинария-и-гостеприимство
27.12.2022
Как сушить грецкие орехи: советы и рекомендации...
К
Кулинария-и-гостеприимство
19.09.2022
Секреты правильного измельчения чеснока...
З
Здоровье
10.08.2022
Как справиться с болью в бедре и качественно выспаться...
Д
Дом-и-сад
02.10.2020
Как правильно клеить обои и избежать ошибок...
К
Кулинария-и-гостеприимство
31.03.2020
Семена чиа: все, что нужно знать о преимуществах и способах употребления...
З
Здоровье
14.12.2021
Как распознать фибрилляцию предсердий?...
К
Компьютеры-и-электроника
14.06.2022
Как отключить голосовое управление iPhone: простые шаги для пользователей...
З
Здоровье
12.08.2021
Избавление от боли в зубе мудрости: легкий и безболезненный способ...
С
Семейная-жизнь
11.01.2022
Как рассказать парню о беременности после случайного секса?...
З
Здоровье
28.05.2020
Как быстро набрать вес (для женщины): советы и рекомендации...
Новые ответы от MOGZ: Информатика
Геймеr228
16.11.2020
Надо! 20 ! в таблице запросы к поисковому серверу. для каждого запроса указан его код – соответствующая буква от а до г. расположите коды запросов слева направо в порядке...
MoDeRFeeD3
21.12.2021
Больничная палата №6 1. Иванов Иван Петрович 2. Петров Александр Иванович 3. Сидоров Павел Иванович 1. Создайте три текстовых документа, назвав их фамилиями пациентов....
superyarmola201
17.08.2022
Паскаль. дано a, b, c – кути трикутника. визначити чи є цей трикутник прямокутним?...
СиэльФантом
21.02.2022
виберіть, як називається оператор мови паскаль представлений у такому вигляді: if then else а вигляд оператора умовного переходу б оператор циклу з передумовою в оператор...
Katerinka64rus
13.08.2021
Треба відшукати помилки і написати правильно, до іть !! 1) Дано два цілих числа а і b (a≤b). Введіть усі числа від а до b включно. a=int(input( Введіть перше число )) b=int(input(...
Valeriag200034
29.01.2023
Как появилось соревнование робо сумо...
123вшагао
23.09.2021
Как сделать елку в КуМир исполнитель чертежник (фото прилагается) (ВВЕРХУ СЛЕВА)...
Медина00
05.02.2023
УМОЛЯЮ НА ГРНЕ ЖИЗНИ И СМЕРТИ информатика...
Vikulya0303
24.02.2022
Некоторое число в двоичной системе счисления записывается как 110001. Определите это число и запишите его в ответе в десятичной системе счисления....
Thfhgdrhd
01.11.2020
Выберите единичные имена объектов. 1) Озеро 5) А. С. Пушкин 2) Москва 6) Машина 3) Самая высокая вершина 7) Файл 4) Клавиатурный тренажёр 8) Windows 10 2. Каждому файлу...
MOGZ ответил
Сделайте синтаксический разбор предложения: Это Пушкин – великий и бессмертный...
11. В РЕКЕ ДАВЛЕНИЕ РАВНО 20 кПа НА ГЛУБИНЕ 1) 2 м 2) 40 м 3) 40 см 4)...
СОР ГЕОМЕТРИЯ ДПЙТЕ ОТВЕТЫ!...
Футбольный мяч находится в точке а футбольного поля на расстояние 23...
В трапеции ABCD основание BC=2, MN параллельна AD, MN=5, AD=7, Найдите...
Задачі на знаходження формули речовини за продуктами згорання. Варіант...
Попробуй Составь по рисунку задачу и реши её. А Помни про 2 составные...
Найдите соответствие между рисункам,числовым промежутком и неравенством...
Подчеркните однородные члены предложений,И таблица(например в круге две...
4. Поставьте существительные в скобках в нужный падеж (тема: склонение...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
mas: array[1..7] of integer;
k, i, MAX:integer;
Begin
for i:=1 to 7 do
Begin
writeln('Введите число');
readln(mas[i]);
end;
MAX:=mas[1];
k:=1;
for i:=2 to 7 do
Begin
if mas[i] > MAX
then
Begin
MAX:=mas[i];
k:=1;
end
else
if MAX=mas[i]
then k:=k+1;
end;
writeln();
writeln('Максимальное значение = ', MAX);
writeln('Количество элементов = ', k);
readln();
end.