var
filetext: text;
a,b,c:integer;
begin
assign(filetext,'INPUT.txt');
reset(filetext);
read(filetext,a);
read(filetext,b);
read(filetext,c);
close(filetext);
assign(filetext,'OUTPUT.txt');
ReWrite(filetext);
c:=a+b-c;
if c>=0 then
Write (filetext, c)
else
Write (filetext, 'Impossible');
end.
программа на фото, проверено, работает правильно
var
filetext: text;
a,b,c:integer;
begin
assign(filetext,'INPUT.txt');
reset(filetext);
read(filetext,a);
read(filetext,b);
read(filetext,c);
close(filetext);
assign(filetext,'OUTPUT.txt');
ReWrite(filetext);
c:=a+b-c;
if c>=0 then
Write (filetext, c)
else
Write (filetext, 'Impossible');
close(filetext);
end.
программа на фото, проверено, работает правильно