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