Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
илья8551
31.03.2022 06:51 •
Информатика
Нужно сложить формулу в excel
👇
Увидеть ответ
Открыть все ответы
Ответ:
Alphons145
31.03.2022
Var
a, b, c, p: real;
a1, b1, c1: real;
a2, b2, c2: real;
function SideLength(a1, a2, b1, b2: real): real;
begin
SideLength := sqrt(sqr(a1 - b1) + sqr(a2 - b2));
end;
begin
writeln('1.Найти сумму трех чисел');
readln(a, b, c);
writeln(a + b + c);
writeln('2.Катеты прямоугольного треугольника известны.Найти гипотенузу.');
readln(a, b);
writeln(sqrt(a * a + b * b));
writeln('3.Найти среднеарифметическое двух чисел.');
readln(a, b);
writeln((a + b) / 2);
writeln('4.Найти длину окружности,если известна площадь круга.');
readln(a);
writeln(sqrt(a / pi) * 2 * pi);
writeln('5.Какой процент составляет число а от числа b.');
readln(a, b);
writeln(a / b * 100);
writeln('6.Найдите площадь треугольника с формулы Герона.');
readln(a, b, c);
p := (a + b + c) / 2;
writeln(sqrt((p - a) * (p - b) * (p - c) * p));
writeln('7.Найдите площадь кольца,если его толщина I см,диаметр внутри круга d см.');
readln(a, b);
c := a + b;
writeln(pi * (c * c - b * b));
writeln('8.Вычислите площадь треугольника заданного координатами вершин.');
readln(a1, a2, b1, b2, c1, c2);
writeln(((a1 - c1) * (b2 - c2) - (a2 - c2) * (b1 - c1)) / 2);
writeln('9.Вычислить длинны сторон треугольника по заданным координатам его вершин.');
a := SideLength(a1, a2, b1, b2);
b := SideLength(c1, c2, b1, b2);
c := SideLength(a1, a2, c1, c2);
writeln(a, ' ', b, ' ', c);
end.
4,4
(90 оценок)
Ответ:
гуля429
31.03.2022
#include <cstdlib>#include <iostream> using namespace std; void MassNullEllement(int *Mass){ int KolEl = 0 ; for(int a=0;a<5;a++){ if(Mass[a]!=0){KolEl++;} } cout<<"amount element not equal zero = "<<KolEl<<"\n"; } int main(int argc, char *argv[]){ int Massiv[5]; for(int b=0;b<5;b++){ cout<<"Enter "<<b<<" element - ";
cin>>Massiv[b]; } MassNullEllement(Massiv); system("PAUSE"); return EXIT_SUCCESS;}
4,4
(17 оценок)
Это интересно:
О
Образование
11.03.2020
Водитель ехал с постоянной скоростью из города А в город Б...
О
Образование
06.04.2022
В треугольнике АВС проведена биссектриса АК...
О
Образование
05.08.2020
Решить систему уравнений x2 + xy +y2 = 13...
О
Образование
16.03.2023
Решить систему уравнений x2 + y2 + xy = 3...
О
Образование
06.01.2021
Клюква стоит 250 рублей за кг, а малина 200....
Х
Хобби-и-рукоделие
24.11.2021
Как научиться делать квиллинг: все, что нужно знать...
13.07.2021
Как заново обрести себя и начать жить полноценной жизнью?...
К
Компьютеры-и-электроника
24.10.2022
Как получить высококачественный звук с помощью Audacity...
О
Образование-и-коммуникации
14.03.2023
Как провести «зеленое» Рождество?...
К
Компьютеры-и-электроника
14.05.2023
Как переключиться на альбомную или книжную ориентацию экрана на Android...
Новые ответы от MOGZ: Информатика
Celebrat
27.06.2022
Чему равно х в десятичной системе счисления, если х = 2213 + 10112 + 105?...
Vikamolch11
04.05.2021
найти ошибку в коде, не правильно ищет максимальное число int main() { srand(time(NULL)); int i,min,max,n,m; int a[10]; printf( массив\n ); for (int i=0; i 10; i++) { a[i]=-15+(rand()%26);...
casha201
11.01.2022
Вычислить сколько лет некоторому городу (G$), если он был основан в указанном году (GO%), а сейчас текущий год (TG%)....
MrDimon07
12.12.2022
не пишите типо не знаю или решить самостоятельно, сразу желоба...
Lasosь
12.12.2022
Напишите программу к этой блок-схеме на языке программирования Паскаль .Очень...
rudembatalov
12.09.2022
Построить таблицы истинности для следующих логических выражений F = ¬A˄B F = ¬ (A˅B) F = A˄B˅C Дам 40 б....
Лиопольд
19.02.2023
Книга состоит из 300 страниц. На каждой странице 45 строк по 60 символов. Необходимо измерить информационный объем данной книги в килобайтах и мегабайтах(1 символ-1 байт)...
Когалымчанин
03.01.2020
с биологией там вегетативного размножение , . Видоизменными побегами .Стеблевыми черенками .Отводками 4 гвоздика 5 смородина 6 картофель 7 тюльпан 8 чеснок ...
erenyeger2398
13.06.2020
Упр.2 Прочитайте текст и вставьте вместо каждого пропуска подходящее слово, выбрав его из выпадающего списка. Два слова в списке лишние. Schools in the Past One (A) years...
Лиззовета
22.02.2020
Неблагородный что означает?...
MOGZ ответил
Объясните,как вы понимаете высказывание Быть человеком трудно, быть свободным—значит...
Какой предмет обладает упругой деформацией? * эспандер глина проволока...
Combine sentences with conjunctions and make time clauses sentences 1)...
НАЙТИ СЕЧЕНИЕ Я карандашом сделал,не смотрите...
Kelly...1. Kelly ... washing ber dress in the bathroom . 2) Our teacher...
Літературний напрям твору Бачиш: між трав зелених...
Дайте названия первым трем главам произведения дубровский...
Напишите 3 аргумента Исторические значение Великого шелкового пути в развитии...
К синонимам слова метель нельзя отнести. пурга смерч вьюга метелица...
2. Измерь длину отрезков. Знаешь ли ты, как называется единица измерения...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
a, b, c, p: real;
a1, b1, c1: real;
a2, b2, c2: real;
function SideLength(a1, a2, b1, b2: real): real;
begin
SideLength := sqrt(sqr(a1 - b1) + sqr(a2 - b2));
end;
begin
writeln('1.Найти сумму трех чисел');
readln(a, b, c);
writeln(a + b + c);
writeln('2.Катеты прямоугольного треугольника известны.Найти гипотенузу.');
readln(a, b);
writeln(sqrt(a * a + b * b));
writeln('3.Найти среднеарифметическое двух чисел.');
readln(a, b);
writeln((a + b) / 2);
writeln('4.Найти длину окружности,если известна площадь круга.');
readln(a);
writeln(sqrt(a / pi) * 2 * pi);
writeln('5.Какой процент составляет число а от числа b.');
readln(a, b);
writeln(a / b * 100);
writeln('6.Найдите площадь треугольника с формулы Герона.');
readln(a, b, c);
p := (a + b + c) / 2;
writeln(sqrt((p - a) * (p - b) * (p - c) * p));
writeln('7.Найдите площадь кольца,если его толщина I см,диаметр внутри круга d см.');
readln(a, b);
c := a + b;
writeln(pi * (c * c - b * b));
writeln('8.Вычислите площадь треугольника заданного координатами вершин.');
readln(a1, a2, b1, b2, c1, c2);
writeln(((a1 - c1) * (b2 - c2) - (a2 - c2) * (b1 - c1)) / 2);
writeln('9.Вычислить длинны сторон треугольника по заданным координатам его вершин.');
a := SideLength(a1, a2, b1, b2);
b := SideLength(c1, c2, b1, b2);
c := SideLength(a1, a2, c1, c2);
writeln(a, ' ', b, ' ', c);
end.