даны 4 вещественных...

Тема в разделе "Информатика", создана пользователем egic_08, 14 фев 2010.

  1. egic_08

    egic_08 New Member

    даны 4 вещественных числа,выведите на экран те из них,значение которых отрицательны.срочнонужно!!!
     
  2. roma-shka

    roma-shka New Member

    var
      a, b, c, d : real;
    begin
      read (a, b, c, d);
      if a < 0 then writeln (a);
      if b < 0 then writeln (b);
      if c < 0 then writeln (c);
      if d < 0 then writeln (d);
    end.
     

Поделиться этой страницей

Наша группа