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