Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Rustem1112
12.06.2020 17:26 •
Информатика
Составить программы в пайтон для вычисления значений двух выражений ,скидывайте проверенные рабочие программы .
Показать ответ
Ответ:
umka2345
05.09.2022 15:53
В C++
#include <iostream>
int main()
{
using namespace std;
const int n = 6;
double arr[n];
for (int i = 0; i < n; ++i)
{
cout << "Enter #" << i + 1 << " element: ";
cin >> arr[i];
}
for (int i = 0; i < n; ++i)
cout << arr[i] << " ";
cout << endl;
double p = 1.0;
bool flag = false;
for (int i = 0; i < n; ++i)
if (arr[i] < 0)
{
p = p * arr[i];
flag = true;
}
if (!flag)
p = 0.0;
cout << "Multiplication of negative: " << p << endl;
int imax = 0;
for (int i = 1; i < n; ++i)
if (arr[i] > arr[imax])
imax = i;
double s = 0;
for (int i = 0; i < imax; i++)
if (arr[i] > 0)
s += arr[i];
cout << "Sum of positive before max: " << s << endl;
double temp;
for (int i = 0, m = n - 1; i < n / 2; ++i, --m)
{
temp = arr[i];
arr[i] = arr[m];
arr[m] = temp;
}
for (int i = 0; i < n; ++i)
cout << arr[i] << " ";
cout << endl;
return 0;
}
0,0
(0 оценок)
Ответ:
fianketo05
19.04.2023 02:15
Function Square(x1, y1, x2, y2, x3, y3: real): real;
begin
Square := abs((x2 - x1) * (y3 - y1) - (x3 - x1) * (y2 - y1)) / 2;
end;
var
x1, y1, x2, y2, x3, y3, s1, s2: real;
begin
write('Задайте первый треугольник(x1,y1,x2,y2,x3,y3): ');
readln(x1, y1, x2, y2, x3, y3);
s1 := Square(x1, y1, x2, y2, x3, y3);
write('Задайте второй треугольник(x1,y1,x2,y2,x3,y3): ');
readln(x1, y1, x2, y2, x3, y3);
s2 := Square(x1, y1, x2, y2, x3, y3);
if s1 > s2 then writeln('Площадь первого треугольника больше')
else if s1 < s2 then writeln('Площадь второго треугольника больше')
else writeln('Площади треугольников равны');
end.
p.s. проверять существуют ли такие треугольники не нужно, т.к. они уже заданы и нам нужно определить площадь большего.
0,0
(0 оценок)
Популярные вопросы: Информатика
Влад5055
04.05.2022 17:22
Найдите значение выражения 10100112 + 3228 - a116ответ запишите в десятичной системе счисления. сколько натуральных чисел расположено в интервале 408 ≤ x ≤ e616сколько натуральных...
marissavyd
08.06.2021 11:47
Ввести с клавиатуры два числа и вывести целую часть от деления первого на второе. python...
egorovaesya
05.12.2020 18:22
Контрольные вопросы Как перейти в графический режим? Как вернуться в текстовый режим?В каком режиме лучше производить ввод-вывод информации?Что происходит в случае ошибки инициализации...
Стешулький361953
10.05.2021 14:58
Информатика. Номер 4 и если сможете номер 3...
zima21zima
23.08.2020 11:58
Даны два числа. Если они равны, то сложить их. Иначе умножить. ЭТО НУЖНО СДЕЛАТЬ В ПРОГРАММЕ Python...
Elena9909
07.04.2021 12:55
9-тапсырма. Тапқырлар сайысы. Төмендегі мақал-мәтелдердің құра- мындағы диалект сөздерді анықтап, түсініп оқы.1. Ел аузына елек қойып болмас. 2. Тозған елді там жияр.3. Пұлсыз...
anastasiiauski
07.04.2021 12:55
4 -тапсырма.Диаграммадағы сөздерді пайдаланып, әбділда Тәжібаевтың «Сырдария»өзені туралы айтып бер.ГейнеСырдарияТарас ШевченкоДнепрА. С. ПушкинЕділ...
as79118487190
26.11.2020 19:46
На рисунке изображены графики четырех функции y kx + b. Выбери те из них, для которых произведение k и b положительно...
Alimmmmm
25.10.2020 10:47
Казак тiлі 42 жаттығу 4 класс 43 тапсырма керек жоқ...
gopd2
24.10.2021 11:40
Find and correct the mistakes in these sentences 1. Pete and Kate is going to stay in a hotel this weekend. 2. They not going to finish the work before next week. 3. I m not...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
#include <iostream>
int main()
{
using namespace std;
const int n = 6;
double arr[n];
for (int i = 0; i < n; ++i)
{
cout << "Enter #" << i + 1 << " element: ";
cin >> arr[i];
}
for (int i = 0; i < n; ++i)
cout << arr[i] << " ";
cout << endl;
double p = 1.0;
bool flag = false;
for (int i = 0; i < n; ++i)
if (arr[i] < 0)
{
p = p * arr[i];
flag = true;
}
if (!flag)
p = 0.0;
cout << "Multiplication of negative: " << p << endl;
int imax = 0;
for (int i = 1; i < n; ++i)
if (arr[i] > arr[imax])
imax = i;
double s = 0;
for (int i = 0; i < imax; i++)
if (arr[i] > 0)
s += arr[i];
cout << "Sum of positive before max: " << s << endl;
double temp;
for (int i = 0, m = n - 1; i < n / 2; ++i, --m)
{
temp = arr[i];
arr[i] = arr[m];
arr[m] = temp;
}
for (int i = 0; i < n; ++i)
cout << arr[i] << " ";
cout << endl;
return 0;
}
begin
Square := abs((x2 - x1) * (y3 - y1) - (x3 - x1) * (y2 - y1)) / 2;
end;
var
x1, y1, x2, y2, x3, y3, s1, s2: real;
begin
write('Задайте первый треугольник(x1,y1,x2,y2,x3,y3): ');
readln(x1, y1, x2, y2, x3, y3);
s1 := Square(x1, y1, x2, y2, x3, y3);
write('Задайте второй треугольник(x1,y1,x2,y2,x3,y3): ');
readln(x1, y1, x2, y2, x3, y3);
s2 := Square(x1, y1, x2, y2, x3, y3);
if s1 > s2 then writeln('Площадь первого треугольника больше')
else if s1 < s2 then writeln('Площадь второго треугольника больше')
else writeln('Площади треугольников равны');
end.
p.s. проверять существуют ли такие треугольники не нужно, т.к. они уже заданы и нам нужно определить площадь большего.