Известны размеры двух ящиков(длина, ширина, высота) .Определить объем какого ящика больше  . Размеры меньшего ящика увеличить в два раза и снова сравнить объемы ящиков . Вывести на экран больший объем. Составить программу в пас...

Известны размеры двух ящиков(длина, ширина, высота) .Определить объем какого ящика больше  . Размеры меньшего ящика увеличить в два раза и снова сравнить объемы ящиков . Вывести на экран больший объем. Составить программу в паскале.    Известны радиусы и координаты центров двух окружностей таких , что одна окружность не содержит внутри другой . Определить пересекаются ли эти окружности (расстояние между центрами должно быть меньше суммы радиусов). Определит площадь большей окружности. Составить программу в паскале
Гость
Ответ(ы) на вопрос:
Гость
Даю пример на c#, авось поможет придумать код на паскале, т.к сам онли в c#: int perva, pervb, pervv; int vtora, vtorb, vtorv; Console.WriteLine("Введите длину первого ящика"); perva = Convert.ToInt32(Console.ReadLine()); Console.WriteLine("Введите ширину первого ящика"); pervb = Convert.ToInt32(Console.ReadLine()); Console.WriteLine("Введите высоту первого ящика"); pervv = Convert.ToInt32(Console.ReadLine()); Console.WriteLine("Введите длину второго ящика"); vtora = Convert.ToInt32(Console.ReadLine()); Console.WriteLine("Введите ширину второго ящика"); vtorb = Convert.ToInt32(Console.ReadLine()); Console.WriteLine("Введите высоту второго ящика"); vtorv = Convert.ToInt32(Console.ReadLine()); int result; int result2; result = perva * pervb * pervv; result2 = vtora * vtorb * vtorv; obratno: if (result > result2) { int anotherresult; anotherresult = result2 * 2; goto obratno; } if (result < result2) { int anotherresult2; anotherresult2 = result * 2; goto obratno; }
Не нашли ответ?
Ответить на вопрос
Похожие вопросы