Даны две рациональные дроби: a/b и c/d. сложите их и результат представьте в виде несократимой дроби m/n. входные данные программа получает на вход 4 натуральных числа a, b, c, d, не превосходящих 100. выходные данные программа должна вывести 2 натуральных числа m и n такие, что m/n=a/b+c/d и дробь m/n – несократима нужно на языке с и с++

Если я правильно понял, то

1. Вариант С++

#include <iostream>

int NOD(int var1, int var2) //Алгоритм Евклида

{

   while(var1 != var2)

   {

       if(var1 > var2)

           var1 = var1 - var2;

       else var2 = var2 - var1;

   }

   return var1;

}

int NOK(int var1, int var2)

{

   return (var1 * var2) / NOD(var1, var2);

}

int main()

{

   short int

       a, b, c, d,

       m, n, NK;

   std::cin >> a >> b >> c >> d;

   NK = NOK(b, d); // избегаем не нужных вычислений

   m = a * (NK / b) + c * (NK / d);

   n = NOK(b, d);

   std::cout << "Первая дробь: " << a << "/" << b << std::endl;

   std::cout << "Вторая дробь: " << c << "/" << d << std::endl;

   std::cout << std::endl << "Результат: " << m << "/" << n << std::endl;

}

2. C

#include <stdio.h>

int NOD(int var1, int var2) //Алгоритм Евклида

{

   while(var1 != var2)

   {

       if(var1 > var2)

           var1 = var1 - var2;

       else var2 = var2 - var1;

   }

   return var1;

}

int NOK(int var1, int var2)

{

   return (var1 * var2) / NOD(var1, var2);

}

int main()

{

   short int

       a, b, c, d,

       m, n, NK;

   scanf("%hi%hi%hi%hi", &a, &b, &c, &d);

   NK = NOK(b, d); // избегаем не нужных вычислений

   m = a * (NK / b) + c * (NK / d);

   n = NOK(b, d);

   printf("Первая дробь: %hi/%d\n", a, b);

   printf("Вторая дробь: %hi/%d\n", c, d);

   printf("Результат: %hi/%hi\n", m, n);

}

Информационная технология (ИТ) — система методов и сбора, накопления, хранения, поиска, обработки, анализа, выдачи данных, информации и знаний на основе применения аппаратных и программных средств в соответствии с требованиями, предъявляемыми пользователями. Целью любой информационной технологии является получение нужной информации требуемого качества на заданном носителе. Информационные технологии состоят из трех основных компонентов (рис. 1):

1. комплекса технических средств — вычислительной, телекоммуникационной и организационной техники;

2. системы программных средств — общего (системного) и функционального (прикладного) программного обеспечения;

3. системы организационно-методического обеспечения.

Рис. 1. Структура информационной технологии.

Система есть совокупность взаимосвязанных элементов, образующих единое целое и функционирующих совместно для достижения единой цели.

Элементы любой системы находятся в постоянном взаимодействии между собой и с внешней средой, в результате чего состояние элементов постепенно изменяется. Такое изменение характерно для любой системы. Если в результате этих изменений система принимает состояние, не соответствующее заданному и не удовлетворяющее предъявленным к ней требованиям, то возникает необходимость в управлении системой — целенаправленном воздействии на ее элементы. Процесс управления состоит из следующих этапов:

1. внешняя среда и объект управления информируют систему управления о своем состоянии;

2. система управления анализирует поступившую информацию, вырабатывает управляющие воздействия на объект управления, отвечает на возмущения внешней среды и при необходимости изменяет структуру всей системы и даже ее цель.

Управляющий объект предназначен для выработки информационных воздействий на основе собранной информации и выдачи их объектам управления. Фактически управляющий объект представляет собой управленческий аппарат системы.

Объект управления — это непосредственный исполнитель, обеспечивающий выдачу информации о своем состоянии и состоянии внешней среды, восприятие информационных воздействий от управляющего объекта и осуществление управляющих действий на основе полученной информации.

Система управления — это совокупность управляющего объекта, объекта управления и каналов прямой и обратной связи между ними [19].

Информационные технологии обладают следующими отличительными свойствами, знание и использование которых крайне важно для жизни и развития общества:

1. Позволяют активизировать и эффективно использовать информационные ресурсы общества, которые сегодня являются наиболее важным стратегическим фактором его развития. Активизация, распространение и эффективное использование информационных ресурсов (научных знаний, открытий, изобретений, технологий, передового опыта) позволяют получить существенную экономию других видов ресурсов: сырья, энергии, материалов и оборудования, людских ресурсов, социального времени.

2. Позволяют оптимизировать и автоматизировать информационные процессы, занимающие все более значительное место в жизни общества. Человечество переживает этап становления информационного общества, в котором объектами и результатами труда большинства занятого населения становятся не материальные ценности, а информация и научные знания. В развитых странах большая часть занятого населения в той или иной мерс связана с подготовкой, хранением, обработкой и передачей информации, вследствие чего вынуждена осваивать и практически использовать соответствующие этим процессам информационные технологии.

3. Информационные процессы — важный неотъемлемый элемент сложных производственных или социальных изменений, информационные технологии часто выступают в качестве компонентов соответствующих производственных или социальных технологий, при этом обычно они включают в себя наиболее важные, «интеллектуальные» функции этих технологий.

Таким образом, информационные технологии предназначены для оптимизации процесса сбора, хранения и обработки информации, снижения трудоемкости использования информационных ресурсов, повышения обоснованности управленческих решений за счет интеграции и своевременного обновления информации, применения новых форм информационной поддержки любых видов деятельности.

Uses graphabc;
 const
  W = 600;
  H = 600;

 function F(x: real): real;
begin
  F := sqr(x);
end;

 var
  x0, y0, x, y, xLeft, yLeft, xRight, yRight: integer;
  a, b, fmin, fmax, x1, y1, mx, my: real;
 begin

  window.Init(0, 0, 800, 500, clwhite);
  window.IsFixedSize := true;
  xRight := 590;
  yRight := 590;
  a := -15;
  b := 6;
  fmin := -10;
  fmax := 20;
  mx := (xRight - xLeft) / (b - a);
  my := (yRight - yLeft) / (fmax - fmin);
   x0 := 380;
  y0 := 490;
  x1 := a;
   while x1 <= b do
  begin
     y1 := F(x1);
     x := x0 + round(x1 * mx);
     y := y0 - round(y1 * my);
     if (y >= 10) and (y <= 590) then SetPixel(x, y, clblack);
     x1 := x1 + 0.001 ;
  end;
end.