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

Записать программу на языке Паскаль.
a:=7
b:=3
c:=a+b
если c>d, то S:=c-d
Иначе S:=d-c

  1. Ответ
    Ответ дан Stepan228322
    var a,b,c,d,S:integer;
    begin
     readln(d);
     S:=0;
     a:=7;
     b:=3;
     c:=a+b;
     if c>d then 
     S:=c-d
     else 
     S:=d-c;
    writeln(S);
    end.
Самые новые вопросы