Question

Прошу помогите пожалуйста с задачей по информатике! Задача на сайте acmp 0755. Решите обязательно на ПАСКАЛЕ!

Answer 1

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.

Answer 2

Ответ:

программа на фото, проверено, работает правильно