Дамп всех задач
This commit is contained in:
8
Pascal/vetvl/Program3.pas
Normal file
8
Pascal/vetvl/Program3.pas
Normal file
@@ -0,0 +1,8 @@
|
||||
var a, b, c, d: real;
|
||||
begin
|
||||
writeln('<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD>');
|
||||
Readln(a, b, c, d);
|
||||
if d-a-b-c >= 0 then writeln('<27><><EFBFBD> <20><><EFBFBD><EFBFBD>', d-a-b-c)
|
||||
else
|
||||
writeln('<27><> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>', d-a-b-c)
|
||||
end.
|
||||
Reference in New Issue
Block a user