Даны два числа...

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

  1. Energiser

    Energiser New Member

    Даны два числа а и в если первое больше второго найти его утроенную разность
     
    Energiser, 29 мар 2010
    #1
  2. Pronych

    Pronych New Member

    Program r;
    uses crt;
    var
    a,b,c: integer;
    begin
    Writeln ('Введите a,b');
    Read (a,b);
    if a>b then
    begin
    c:=3*(a-b);
    Write (c);
    end
    else
    Write ('Первое чиcло меньше второго');
    end.
     
    Pronych, 29 мар 2010
    #2

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

Наша группа