Определить принадлежит ли точка x отрезку от 1 до 10 в pascal program
Да пренадлеңит братан
а можно написать в таком виде: Program If_16; var a,b,c: integer; begin write('Введите A, B и C: '); readln(a,b,c); if (b begin a := 2 * a; b := 2 * b; c := 2 * c; end else begin a := -a; b := -b; c := -c; end; writeln (a,' ',b,' ',c); end.
я думаю можно\
так напиши
Ну там 1 мм не хватает чтобы принадлежала,а так точка х принадлежит отрезку от 1 до 100