profile
Опубликовано 5 лет назад по предмету Информатика от Uvako1

помогите с алгоритмом

  1. Ответ
    Ответ дан никиткаро
    Привет, если я правильно понял задания тогда должно быть вот так
    А=-20
    1. Ответ
      Ответ дан svyatoslavlezin
      var a,b:integer;
      begin
      a:=50;
      b:=60;
      if a>b then
      b:=b+a
      else
      a:=a-b;
      a:=a*2;
      write (a);

      end.
  2. Ответ
    Ответ дан andrijalbrext
    var a,b:integer;
    Begin  a:=50;  b:=60;    if a>b then b:=b+a   else a:= a-b;  a:= a * 2;  Writeln(a);
    End.
Самые новые вопросы