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

makismunguran makismunguran    2   01.05.2020 22:48    1

Ответы
AlsiMaksimowa AlsiMaksimowa  14.10.2020 05:54

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.


с задачей по информатике! Задача на сайте acmp 0755. Решите обязательно на ПАСКАЛЕ!
ПОКАЗАТЬ ОТВЕТЫ
kravchenko1712 kravchenko1712  14.10.2020 05:54

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


с задачей по информатике! Задача на сайте acmp 0755. Решите обязательно на ПАСКАЛЕ!
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика