Var ar: array[1..30] of integer; i,max: integer; begin; randomize; writeln('array'); for i: =1 to 30 do begin; ar[i]: =random(1,100); write(ar[i]: 4); end; for i: =1 to 30 do if max< ar[i] then max: =ar[i]; writeln; writeln('result: ',max); end.
Спасибо
Ответ дал: Гость
основной текст в египте писали чёрной краской ,чтобы выделить начало строки или фразы писали красным .(но выделяли редко -писчий материал был дорогим).
Ответ дал: Гость
текст: happy new year, dear содержит 30 символов. при кодировании текста с acsii каждый символ кодиреутся 8 битами или 1 байтом, следовательно
Популярные вопросы