Недавнее содержимое от Anton19947

Построение блок схем по коду Pascal Дана цифра М. Удалить из записи каждого элемента массива эту цифру. Var A:array[1..100] of integer; i,n,m:byte; Function F(n:integer):integer; Var s:string; i,k:integer; Begin Str(n,s); For i:=Length(s) downto 1 do if...