Даны 3 числа...

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

  1. лисонька

    лисонька New Member

    Даны 3 числа a b c возвести в квадрат только отрицательные черeз qbasic
     
    лисонька, 1 янв 2010
    #1
  2. Buter

    Buter New Member

    Var a, b, c: longint;
    begin
      readln(a, b, c);
      if a<0 then writeln (a*a);
      if b<0 then writeln (b*b);
      if c<0 then writeln (c*c);
    end.
     
    Buter, 1 янв 2010
    #2

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

Наша группа