нужно сделать. С РЕШЕНИЕМ И ОБЪЯСНЕНИЕМ КАК ДЕЛАТЬ ВСЕ ПОДРОБНО

на фотографии ответ

Не понял что именно от тебя хотят.но если все действия происходят в паскаль, то на оператор ветвления.а вот и сама программа на всякий случай: program proverka; uses crt; var x: real;         begin                        clrscr;                             writeln ('введите x');                           readln (x);                                                                         if x< 0 then                                                          writeln ('отрицательное число x=' , x: 5: 2)                                                else                                                            begin                                                                    if x> 0 then                                                                              writeln ('положительное число x=' , x: 5: 2)                                  else                                                          writeln ('вы выбрали неверное значение');                                                       end;                           readln;     end.