Для настольной игры используются карточки с номерами от 1 до N. Одна карточка потерялась. Найдите ее, зная номера оставшихся карточек.
Входные данные
Дано число N, далее N-1 номер оставшихся карточек (различные числа от 1 до N).
Выходные данные
Программа должна вывести номер потерянной карточки.
Answers & Comments
Verified answer
Var n,i,k,s1,s2:integer;begin
write('n='); readln(n);
s1:=n; s2:=0;
for i:=1 to n-1 do
begin
write('k',i,'='); readln(k);
s1:=s1+i; s2:=s2+k;
end;
writeln('Потерялась карточка ',s1-s2);
end.
Пример:
n=5
k1=1
k2=3
k3=4
k4=5
Потерялась карточка 2