Var a, b, c: integer; begin writeln('Введите три числа:'); readln(a, b, c); if (a > b) and (a > c) then writeln(a); if (b > a) and (b > c) then writeln(b) else writeln(c) end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку