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.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
