Якщо відомі ціна і кількість проданого товару кожен день протягом тижня, то визначити, в який день була максимальною виручка. Скласти блок-схему алгоритму , код програми в середовищі Delphi.
У програмі цієї задачі використовувати оператор циклу з лічильником.
(Задача похожая на твою,подставь свои цифры))"В классе 28 учеников(-а), из них 12 школьников занимаются в математическом кружке, 6 — в литературном, 6 литераторов увлекаются математикой. Сколько ребят не посещают эти кружки? Используй для решения круги Эйлера."
Объяснение:
Всего 35 учеников. 10 кружки не посещают. Значит, посещают кружки 35-10=25 учеников.
25 учеников посещают кружки. 20 учеников занимаются в математическом кружке. Значит, только литературный кружок посещают 25-20=5 человек. В литературном кружке 11 человек. Лишь 5 из них посещают только литературный кружок.
Значит, 11-5 = 6 человек-литераторов посещают ещё и математический кружок.
Задача 1:
using System;
namespace ConsoleApp1
{
class Program
{
static double Method(double x, double y)
{
return 5 * x * x + 3 * y * y;
}
static void Main(string[] args)
{
int a, b, c, d;
Console.WriteLine("Введите a:");
a = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите b:");
b = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите c:");
c = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите d:");
d = Convert.ToInt32(Console.ReadLine());
if (Method(a, b) < Method(c, d))
Console.WriteLine("Значение 5x^2+3y^2 минимально для чисел {0} и {1}",a,b);
else
Console.WriteLine("Значение 5x^2+3y^2 минимально для чисел {0} и {1}", c, d);
}
}
}
Задача 2:
using System;
namespace ConsoleApp1
{
class Program
{
static void Swap(ref int n, ref int m)
{
int tmp = n;
n = m;
m = tmp;
}
static void Main(string[] args)
{
int[] A = new int[10];
Random r = new Random();
Console.WriteLine("Исходный массив: ");
for (int i = 0; i < 10; i++)
{
A[i] = r.Next(100);
Console.Write(A[i]+" ");
}
for (int i = 0; i < 9; i++)
for (int j = i + 1; j < 10; j++)
if (A[i] < A[j]) Swap(ref A[i],ref A[j]);
Console.WriteLine("\nОтсортированный по убыванию массив: ");
for (int i = 0; i < 10; i++)
Console.Write(A[i] + " ");
}
}
}