Program abc;
var a,b,c:integer;
begin
writeln('Введите первую сторону');
read(a);
writeln('Введите вторую сторону');
read(b);
writeln('Введите третью сторону');
if (a>b) and (a>c) then write(a);
if (b>a) and (b>c) then write(b);
if (c>a) and (c>b) then write(c);
if (a=b) or (a=c) or (c=b) then write('Есть равные стороны и нет большей')
end.
Я так полагаю вы про оптимизацию.
Ответ:
когда на ШАГ придешь я помогу
Объяснение:
Описание внешней информационной среды, с которой<span> </span>будет взаимодействовать разрабатываемое программное<span> </span>обеспечение. Должны быть определены все используемые каналы ввода и вывода и все информационные объекты, к которым будет<span> </span>применяться разрабатываемое ПС, а также существенные связи<span> </span><span>между этими информационными объектами.</span>