Задача 13 урок 9
Primary tabs
http://fkn.ktu10.com/?q=node/8539
У вас есть три числа (три переменные) найдите их медиану(link is external)
program task13_lesson10; var a,b,c:integer; begin writeln('Enter 3 number:'); readln(a,b,c); if ((a < b) and (a > c)) or ((a > b) and (a < c)) then writeln('Meridian is: ',a) else if ((a > b) and (b > c)) or ((a < b) and (b < c)) then writeln('Meridian is: ',b) else writeln('meridian is: ',c); readln(); end.
- Log in to post comments
- 856 reads