Задача 13 Урок 9
Primary tabs
У вас есть три числа (три переменные) найдите их медиану.
program z13; var a, b, c: integer; begin writeln ('VVedite tri chisla'); readln(a,b,c); if a>b then if a<c then writeln (a) else if c>b then writeln(c) else writeln(b) else if b<c then writeln(b) else if a>c then writeln(a) else writeln(c); readln(); end.
- Log in to post comments
- 698 reads