Урок 9 Задача 15
Primary tabs
У вас есть три числа (три переменные) найдите их медиану(link is external)
program u9z15; var a,b,c:integer; begin writeln('vvedite 3 chisla'); readln(a,b,c); if ((a > b) and (a < c)) or ((a > c) and (a < b)) then writeln('mediana ', a ) else if ((b > a) and (b < c)) or ((b > c) and (b < a)) then writeln('mediana ', b) else writeln('mediana ',c); readln(); end.
- Log in to post comments
- 440 reads