Нурлану нужно пронумеровать и подписать рисунки в своем реферате. *НазваниеОглавлениеСноскаГиперссылка Алия в своем докладе должна перейти к таблице, которая оформлена в отдельном документе Таблица.doc. * НазваниеСноскаГиперссылкаОглавлениеДоклад Мадияра состоит из 50 страниц. Для облегчения поиска информации в докладе, он решил создать список, в котором будут указаны темы глав и разделов, а так же номера страниц. * НазваниеГиперссылкаОглавлениеСноскаМадина использовала в своем эссе слова Абая. Чтобы добавить ссылку на автора слов, ей нужно оформить пояснение или комментарий. * СноскаНазваниеОглавлениеГиперссылкаНазадДалее ЧЕРЕЗ 25 МИНУТ НАДО ЗДАВАТЬ СОР ПО ИНФОРМАТИКЕ

Вычитаем первое число из второго.

Если результат отрицательный, то первое меньше второго.

Если нулевой, то они равны.

Если положительный, то первое больше второго.

Найдем разность между первым и вторым значением: c=a-b

Все что нам требуется сделать, это выяснить, является ли с положительным числом.

Например, используя функцию сигнум, можно получить вариант функции Хевисайда, которая будет принимать значение 1 только для положительных значений, а во всех остальных случаях обращаться в ноль. f(c)=[(sgn(c)+1/)2]

В нашем случае можно записать, что max(a,b)=a*f(c)+b*f(-c)

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

Конечно, данный алгоритм реализуем при условии наличия встроенной функции сигнум (она присутствует даже в старом Бейсике ). Но даже если такой встроенной функции нет, ее написание не составит большого труда.

//Общее сопротивление сети: 
// 1/R = 1/r1 + 1/r2 
// 1/R = (r2+r1)/(r2*r1) 
// R = r2*r1 / (r2 + r1) 
//Закон Ома для участка цепи: 
// I = U/R  

var   
r1,r2,u : integer;   
R,I : real;    

begin 
writeln ('Введите значения сопротивления (r1 r2)'); 
readln (r1,r2); 
writeln ('Укажите напряжение на концах цепи (u)'); 
readln (u);   

R := r2*r1 / (r2 + r1); 
I := U/R;   

//Фактически можно не использовать переменную R 
//А вставить выражение сразу     
//    I := U/( r2*r1 / (r2 + r1) );       

writeln ('Сила тока на участке = ',I); 
end.