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
Замечание: вводить только натуральные числа!
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Что является исходными данными для грис?
Автор: Shtorm-Shoe
Как переносится текст в электронной таблице ms excel 2010?
Автор: oskon008
Как можно вставить сноски в документ с горячих клавиш?
Автор: kalterbrun
Представьте десятичные числа в беззнаковом 8-разрядном формате а)59 б)126
Автор: qadjiyevaaynura
1) 1 2) 211 3) 3211211 сколько цифр будет в 10 строке
Автор: club-pushkin
Во не для сайта знания ком. Так что готовься к тому что тебе его удалять, но я постараюсь ответить...
Тут два варианта есть:
Первый, это то, что у тебя плохое охлаждения, и после даже обычной работы, у тебя нагреваться процессор или видеокарта и в играх начинает тормозить. По этому при самом запуске компьютера, все части холодные и всё работает как надо. Советую поставить какую то программу для проверки температуры.
Второй вариант, это то, что ты не закрываешь до конца браузер, т.е. ты как бы его закрыл, но он у тебя до сих пор запущен. Такое часто бывает если установлены какие то расширения на него, к примеру какие то VPN или прочие программы, которые не дают полностью тебе его закрыть.