Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
nas4285
27.03.2023 05:36 •
Информатика
Определить, есть ли среди введенных чисел число 5?
QBASIK
Показать ответ
Ответ:
gordeevnikita11
04.02.2020 20:51
Вот на С++:
#include <iostream>
#include <sstream>
#include <fstream>
#include <string>
#include <vector>
#include <deque>
#include <queue>
#include <stack>
#include <set>
#include <map>
#include <algorithm>
#include <functional>
#include <cstring>
#include <utility>
#include <bitset>
#include <cmath>
#include <cstdlib>
#include <ctime>
#include <cstdio>
#include <climits>typedef unsigned long long ulol;
typedef long double ld;
typedef long long lol;
typedef long int li;#define mp make_pair
#define F first
#define S second
#define sqr(a) ( (a) * (a) )
#define pb push_back
#define INF 999999999
#define ret(a) cout << endl; system("pause"); return(a)
//#define ret(a) return(a)using namespace std;int main()
{
ld x;
cin >> x;
x = ( 8 / sqrt( x ) ) + sqrt(x);
cout << x;
ret(0);
}
0,0
(0 оценок)
Ответ:
blecstar2000
29.07.2020 14:22
Var a1, b1, c1, a2, b2, c2, p1, p2, s1, s2: real;
begin
writeln('Введите строны первого треугольника: ');
read(a1, b1, c1);
writeln('Введите стороны второго треугольника: ');
read(a2, b2, c2);
p1 := (a1 + b1 + c1) / 2;
p2 := (a2 + b2 + c2) / 2;
s1 := sqrt(p1 * (p1 - a1) * (p1 - b1) * (p1 - c1));
s2 := sqrt(p2 * (p2 - a2) * (p2 - b2) * (p2 - c2));
if (s1 + 1e-3 > s2) and (s1 < s2 + 1e-3) then writeln('Равновеликие')
else writeln('Неравновеликие');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
EM20011
21.02.2020 18:54
Алгоритм вычисления значения функции f(n), где n- натуральное число, задан следующими соотношениями: f(1)=1, f(2)=2, f(n)=2*f(n-1)+(n-2)*f(n-2), при n 2. чему равно...
anastasia3004
13.08.2020 13:51
Как изменить внешний вид значка объекта рабочего стола? опишите данный алгоритм. 30 ....
maschkuznetsov
30.07.2020 18:49
малыш может съесть 600 г варенья за 5 минут, а Карлсон - два раза быстрее. За какое время они съедят это варенье вместе?...
Игрик900
21.12.2021 18:08
Эссе трагедия У.Шекспира Ромео и Джульетта в искусстве и кино сила любви победить даже смерть(по трагедии У.Шекспира Ромео и Джульетта...
рвовивовл
13.01.2022 02:02
X1 и х2 корни уравнения х^2-5х+n=0.зная, что √х1 + √х2 = 3, найдите n и решите уравнение...
ксения282006
17.07.2021 15:55
9. укажіть заряд флуорид-аніону в йонній сполук Кальцію.10. складіть рівняння між калієм і бромом. у відповіді вкажіть суму коефіцієнтів в рівнянні.2. у разі перетворення...
aknurrakhmanber
02.01.2020 14:02
параграф: Северный Кавказ во внешней политики России в XVIII в. тема: значение кючук-кайнарджийского договора. краткий конспект...
irakar03
19.03.2020 14:03
Знайдіть площу рівнобедреного трикутника, у якому основа дорівнює 30, а синус гострого кута при основі становить 8/17...
53453fd
29.01.2023 09:01
План:1. Рассуждение по теме2.Пример из повести3.Второй пример из повести4. Вывод...
Elizafeta1
22.08.2020 22:33
Написать мини доклад о арабских открытиях в 1 науке и в конце сочинения написать как это подействовало на наше время .Умоляю я вас очень ! даю...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
#include <iostream>
#include <sstream>
#include <fstream>
#include <string>
#include <vector>
#include <deque>
#include <queue>
#include <stack>
#include <set>
#include <map>
#include <algorithm>
#include <functional>
#include <cstring>
#include <utility>
#include <bitset>
#include <cmath>
#include <cstdlib>
#include <ctime>
#include <cstdio>
#include <climits>typedef unsigned long long ulol;
typedef long double ld;
typedef long long lol;
typedef long int li;#define mp make_pair
#define F first
#define S second
#define sqr(a) ( (a) * (a) )
#define pb push_back
#define INF 999999999
#define ret(a) cout << endl; system("pause"); return(a)
//#define ret(a) return(a)using namespace std;int main()
{
ld x;
cin >> x;
x = ( 8 / sqrt( x ) ) + sqrt(x);
cout << x;
ret(0);
}
begin
writeln('Введите строны первого треугольника: ');
read(a1, b1, c1);
writeln('Введите стороны второго треугольника: ');
read(a2, b2, c2);
p1 := (a1 + b1 + c1) / 2;
p2 := (a2 + b2 + c2) / 2;
s1 := sqrt(p1 * (p1 - a1) * (p1 - b1) * (p1 - c1));
s2 := sqrt(p2 * (p2 - a2) * (p2 - b2) * (p2 - c2));
if (s1 + 1e-3 > s2) and (s1 < s2 + 1e-3) then writeln('Равновеликие')
else writeln('Неравновеликие');
end.