Распишите как это делать закодируйте следующие тексты: my happy english ну и темы пошли! надоело ! запишите коды в 16-ричной форме. используйте калькулятор.
Шаг 1. Узнаёшь коды символов по таблице нужной кодировки (ну или слентяйничать, как я) Шаг 2. Перевести все коды из в калькулятором... Или нет х) Шаг 3. Записать всё по порядку. Если кодировка однобайтная, как сейчас, то можно хоть подряд... 4D 79 20 68 61 70 70 79 20 45 6E 67 6C 69 73 68
Const n = 5; m = 5; var a:array[1..n,1..m] of integer; i,j,s:integer; begin //Для теста заполним массив сл.числами for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(21)-10; write(a[i,j]:4); end; writeln;writeln; end; //сумма всех элементов массива for i:=1 to n do for j:=1 to m do s:=s+a[i,j]; writeln('сумма всех элементов массива: ',s); //сумма каждой строки for i:=1 to n do begin s:=0; for j:=1 to m do begin s:=s+a[i,j]; end; writeln ('Строка: ',i,' сумма:',s); end; end.
// с циклом while var s,i:integer; begin i:=100; while i<=999 do begin if i mod 77 = 0 then s:=s+i; i:=i+1; end; writeln('Сумма трехзначных кратных 77: ',s); end.