Программа написана и протестирована на языке PascalABC.NETvar A, B, C: real; e, f: real;begin Readln(A, B, C); Readln(e, f); if (A >= e) and (A <= f) then Writeln(A); if (B >= e) and (B <= f) then Writeln(B); if (C >= e) and (C <= f) then Writeln(C);end.
Для увеличения картинки нажмите на лупу (расположена на фотографии) либо откройте фотографию в новой вкладке.
Для увеличения картинки нажмите на лупу (расположена на фотографии) либо откройте фотографию в новой вкладке.