Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Anastasia12578
10.11.2020 18:01 •
Информатика
Д/з будет ответить на вопросы: 1. Какие вычислительные машины относятся к аналоговым компьютерам?
2. Сколько поколений компьютеров существует?
3. На стр.17 заполнить таблицу
Показать ответ
Ответ:
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 оценок)
Ответ:
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 оценок)
Популярные вопросы: Информатика
tolokvlad
09.07.2022 15:02
Какие материалы, можно применить к объектам...
62620243323
12.09.2022 04:32
1) Какие геометрические фигуры ты выбрал при создании нового орнамента и почему?2) Какой предмет домашнего обихода ты можешь использавать для нанесения своего орнамента?...
ViktoriaDog2006
05.02.2023 07:33
Дана действительная матрица размера NxM; упорядочить (переставить) строки матрицы по возрастанию значений наибольших элементов строк. с объяснением строк На C#...
mama28163001
26.01.2022 10:45
не понимаю информатику...
radzihovskaa
19.10.2022 03:21
Получите из слова ТЕСТИРОВАНИЕ слово НИВА . Для этого используй команды: copy, delete, insert и операция сложения строк....
lydavika755
14.09.2022 02:28
Объясните ошибки в следующих записях на языке Паскаль, а также предложите, как можно исправить запись выражения №3? 1) tan(2* x +30 3.14) 2) (false / 2) /\ not(true) 3)...
polinna2006p06aeo
09.03.2020 06:42
напишите программу, которая в последовательности натуральных чисел определяет количество чисел кратных 3 и оканчивается на 3. программа получает на вход количество чисел...
Tobirama0shok
20.04.2023 14:53
Найдите все целые значения x, при которых логическое варыжание (x 1)^(¯¯¯x или =7)(последняя скобка инверсия ещё) будет истинно...
mintgirl
07.06.2021 20:29
:ввести одновимірний масив з N дійсних чисел в діапазоні від -10 до 10.Обчислити середнє арифметичне квадратів від ємних чисел...
КукуцапольОрегинал
03.06.2022 09:49
Запишите алгоритм выполнения рисунка, который изображён быстрей...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
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.
#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);
}