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