Где таблица по которой делать?
При удалении фаилов по сети они полностью удаляются а в локальном компьютере они не полностью удаляются а лиш перезаписывается место
var i,j:integer;
begin
for i := 1 to 4 do
begin
for j:=i to 4 do write('0');
writeln
end
end.
<h2>Программа не будет работать без <u>ключевого слова алг</u> и <u>ключевого слова кон</u></h2>
Файл исходник input, файл ответ output