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

CPOЧНО, ПОЖАЛУЙСТА, ПОМОГИТЕ НАПИСАТЬ ПРОГРАММУ НА ЯЗЫКЕ PASCAL

  1. Ответ
    Ответ дан pokemanbr
    program kart;
    var
       n,i,sum,z:integer;
    begin
       read(n);
       sum:=0;
       for i:=1 to n-1 do begin
          read(z);
          sum:=sum+z;
       end;
       writeln((n*(n+1)) div 2 - sum);
    end.
Самые новые вопросы