var
s1, s2, s3, d:longint;
begin
writeln('Введите количество орехов');
readln(s1);
writeln('Введите количество грибов');
readln(s2);
writeln('Введите количество съеденных орехов');
readln(s3);
d:=s1-s3;
writeln('Количество оставшихся орехов ', d);
end.