1)выберите правильный термин к его определению: « - это модель объекта, представленная в виде предметной копии.» а)информационная модель б)графическая модель в)обычная модель г)материальная модель вопрос №2: выберите правильный термин к его определению: « - это модель объекта, представленная в виде описания.» а)информационная модель б) графическая модель в) материальная модель г)обычная модель вопрос №3: по какому критерию модели делят на , биологические, , социальные… а) по сферам знаний б) по строению в) по форме подачи г) по отраслям использования вопрос №4: по какому критерию модели делят на словесые, графические, структурные, , специальные… а) по отраслям использования б) по строению в) по сферам знаний г)по форме подачи вопрос №5: по подачи модели распределяют на: а) биологические и б) одиночные и множественные в)материальные и информационные г) объектные и субъектные
Ответы
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
function NOD(a,b:integer):integer;
begin
while b>0 do (a,b):=(b,a mod b);
Result:=a
end;
procedure FracAdd(n1,d1,n2,d2:integer; var n,d:integer);
// сложение дробей n1/d1 + n2/d2 = n/d
begin
(n,d):=(n1*d2+n2*d1,d1*d2);
var k:=NOD(n,d);
if k<>1 then (n,d):=(n div k,d div k)
end;
begin
var (a,b):=ReadInteger2('Введите числитель и знаменатель 1й дроби:');
var (c,d):=ReadInteger2('Введите числитель и знаменатель 2й дроби:');
var m,n:integer;
FracAdd(a,b,c,d,m,n);
if n=1 then Writeln('Сумма=',m)
else Writeln('Сумма=',m,'/',n)
end.
Пример
Введите числитель и знаменатель 1й дроби: 6 15
Введите числитель и знаменатель 2й дроби: 12 300
Сумма=11/25
Замечание: вводить только натуральные числа!
// Внимание! Если программа не работает, обновите версию!
function NOD(a,b:integer):integer;
begin
while b>0 do (a,b):=(b,a mod b);
Result:=a
end;
procedure FracAdd(n1,d1,n2,d2:integer; var n,d:integer);
// сложение дробей n1/d1 + n2/d2 = n/d
begin
(n,d):=(n1*d2+n2*d1,d1*d2);
var k:=NOD(n,d);
if k<>1 then (n,d):=(n div k,d div k)
end;
begin
var (a,b):=ReadInteger2('Введите числитель и знаменатель 1й дроби:');
var (c,d):=ReadInteger2('Введите числитель и знаменатель 2й дроби:');
var m,n:integer;
FracAdd(a,b,c,d,m,n);
if n=1 then Writeln('Сумма=',m)
else Writeln('Сумма=',m,'/',n)
end.
Пример
Введите числитель и знаменатель 1й дроби: 6 15
Введите числитель и знаменатель 2й дроби: 12 300
Сумма=11/25
Замечание: вводить только натуральные числа!
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Выделите красным контуром ложные высказывания, зелёным-истинные
Автор: zu87zu87
Решить из информатики (картинка
Автор: Igorevich1559
Решите задания по информатике( хоть какой нибудь буду сильно благодарен
Автор: kizyaev6651
Какие виды данных можно внести в ячейки таблицы?
Автор: irohmichaelchikaodiri
Во не для сайта знания ком. Так что готовься к тому что тебе его удалять, но я постараюсь ответить...
Тут два варианта есть:
Первый, это то, что у тебя плохое охлаждения, и после даже обычной работы, у тебя нагреваться процессор или видеокарта и в играх начинает тормозить. По этому при самом запуске компьютера, все части холодные и всё работает как надо. Советую поставить какую то программу для проверки температуры.
Второй вариант, это то, что ты не закрываешь до конца браузер, т.е. ты как бы его закрыл, но он у тебя до сих пор запущен. Такое часто бывает если установлены какие то расширения на него, к примеру какие то VPN или прочие программы, которые не дают полностью тебе его закрыть.