Точно и четко сформулировать условие задачи, которая решается в данной программе
[email protected] в категроии Информатика, вопрос открыт 07.06.2018 в 22:52
Program Kr_2;
Var A, B, C, Max, Min, Max2, Min2 : Real;
Begin
WriteLn('Введите три числа: '); ReadLn(A, B, C);
If A > B Then begin Max := A; Min := B end
Else begin Max := B; Min := A end;
If Max > C Then begin Max2 := Max; Min2 := C end
Else begin Max2 := C; Min2 := Max end;
Max2 := Max2 - (Min + Min2);
WriteLn(Max2 : 7 : 2)
End.
К данной программе составить блок-схему.
СПАСИБО ЗАРАНЕЕ
0 ответов
Нет результатов.
Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.