Add Pascal learning files

This commit is contained in:
2025-11-20 21:18:32 +02:00
parent 1ce193cc0d
commit 258f24570a
37 changed files with 587 additions and 0 deletions

View File

@@ -0,0 +1,8 @@
Program trololo;
var k,d,r,s:integer;
Begin
ReadLn(k,d);
r:=k div d;
s:=k mod d;
WriteLn('<27><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ',k,' <20><> ',d,'<27><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ',r,'(<28><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> ',s,')');
end.