Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
варя373
24.06.2022 08:41 •
Информатика
Найти значение логического выражения.
(1 ν 0) & (1 ν 0) & (1 → 0)
Показать ответ
Ответ:
dashponi2007
17.03.2020 09:32
В 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 оценок)
Ответ:
helpme168
16.03.2021 18:40
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 оценок)
Популярные вопросы: Информатика
Boom11ok
10.05.2023 01:39
Объявлена функция int Funct1(int a, int b) {return a/b;} Далее - функция main() , в которой есть строка int z = Funct1( 15, 20); Чему в результате будет равен z ?...
elizavetanosova2000
21.04.2022 07:30
Сколько раз будет выполнен заданный цикл?fori:=1 to 15 dot:= random (100)...
Gimngazia
07.05.2023 23:15
1. построить графики функций y1 = x 2 – 1, y2 = x2 + 1 и y = к • (y1/y2)на интервале [–3; 3] с шагом 0,3. все выполнить средствами excel....
Victoriya1234567890
06.05.2023 03:55
2. построить графики функций у = х2 и у = 2х2 в промежутке [–4; 4] с шагом 0,5. все выполнить средствами excel....
ivanzalivnoi
23.08.2020 03:52
1. постройте в электронных таблицах двумерную модель «жизнь». проведите вычислительный эксперимент с разными вариантами первоначального расселения организмов. попробуйте найти...
shadedarawshy9
10.03.2020 17:12
Составить базу данных в microsoft access по теме телепередачи, таблицы надо связать между собой и сделать запрос....
Танюха1410
29.05.2021 15:14
Сделай гиперсылку в новый файл казахстан.ppt и запишите гиперссылку...
MBmagic
26.06.2021 10:26
Расстояние между двумя словами определяется минимальным количеством основных операций с буквами слов, которое позволяет заменить первое слово на второе. основные операции с...
alinaLodygina
28.12.2021 21:48
10. выпиши номера истинных высказываний: а) земля – одна из планет солнечной системы. б) неверно, что 1 байт – наименьшая единица измерения информации. в) все попугаи – относятся...
Гилязарт
09.07.2021 08:50
Положите по порядку оформление автооглавления.ссылки - добавить текст, выбираем уровеньоглавление - автособираемое оглавление,выделяете текст который необходимо внести в содержаниефайл...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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. проверять существуют ли такие треугольники не нужно, т.к. они уже заданы и нам нужно определить площадь большего.