Помогите,пожалуйста!. Даны два...

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

  1. Daos

    Daos New Member

    Помогите,пожалуйста!. Даны два числа. Если они оба отрицательны, то найти остаток от деления первого на второе, в противном случае найти ихразность.Сделать в фри паскале.На английском языке.
     
    Daos, 4 фев 2010
    #1
  2. Невозвращенец

    Невозвращенец New Member

    Program da;
    Var a,b,c:integer;
    Begin
    WriteLn('');
    Read (a,b);
    If (a<0) and (b<0)
    then c:= a mod b
    else c:= a-b;
    WriteLn(c);
    end. 
     
    Должно получится. Если не получится, поменя какие-то условия. Должно быть так.
     
    Невозвращенец, 4 фев 2010
    #2

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

Наша группа