В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
4236fjfjfuf
4236fjfjfuf
19.11.2022 18:24 •  Информатика

Составить программу на языке Pascal, которая запросит два вещественных числа и три целых.

Показать ответ
Ответ:
violettasergeevna
violettasergeevna
15.06.2022 19:18
Напишите  программу,  которая  выбирает  максимальное  и  минимальное  из  пяти  введённых  чисел.3.напишите  программу,  которая  определяет,  верно  ли,  что  введённое  число  –  трёхзначное.4.напишите  программу,  которая  вводит  номер  месяца  и  выводит  название  времени  года.оператор  выбора  использовать  не  разрешается.  при  вводе  неверного  номера  месяца  долж‐но  быть  выведено  сообщение  об  ошибке.5.решите  предыдущую    с    оператора  выбора.6.напишите  программу,  которая  вводит  с  клавиатуры  номер  месяца  и  определяет,  сколько  дней  в  этом  месяце.  при  вводе  неверного  номера  месяца  должно  быть  выведено  сообще‐ние  об  ошибке.7.напишите  программу,  которая  вводит  с  клавиатуры  номер  месяца  и  день,  и  определяет,сколько  дней  осталось  до  нового  года.  при  вводе  неверных  данных  должно  быть  выведено  сообщение  об  ошибке.8.напишите  программу,  которая  вводит  возраст  человека  (целое  число,  не  превышающее  120)и  выводит  этот  возраст  со  словом  «год»,«года»  или  «лет».  например,«21  год»,«22  года»,«25  лет».9.напишите  программу,  которая  вводит  целое  число,  не  превышающее  100,  и  выводит  его  прописью,  например,21→«двадцать  оди
0,0(0 оценок)
Ответ:
530Саша1111
530Саша1111
08.12.2020 00:35
// тестировалось на C#.Net Framework 4.5
using System;

class Program
{
    static void Main()
    {
        int x1 = 2, y1 = 1;
        int x2 = 6, y2 = 5;
        int x3 = 10, y3 = 1;

        var a = Distance(x2, y2, x3, y3);
        var b = Distance(x1, y1, x3, y3);
        var c = Distance(x2, y2, x1, y1);

       
        Console.WriteLine("S = {0}", Square(a, b, c));
        Console.ReadKey();
    }

    //растояние между точками
    static double Distance(int x1, int y1, int x2, int y2)
    {
        return Math.Sqrt((x2 - x1) * (x2 - x1) + (y2 - y1) * (y2 - y1));
    }

    //формула герона
    static double Square(double a, double b, double c)
    {
        var p = (a + b + c) / 2;
        return Math.Sqrt(p * (p - a) * (p - b) * (p - c));
    }

    // теорема косинусов
    static double Angle(double a, double b, double c)
    {
        return Math.Acos((b * b + c * c - a * a) / (2 * b * c));
    }

    static bool IsAcuteAngel(double alpha)
    {
        return alpha < Math.PI / 2;
    }
}
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота