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