Рисование символами в паскаль abc. символы должны отделяться пробелами. выведите на экран * * ***** ***** ********* *********

Program ggt; begin writeln('     *     '); writeln('     *     '); writeln('   *****   '); writeln('   *****   '); writeln(' ********* '); writeln(' ********* '); end.

Const     k = 15; var     r: array[1..k] of integer;     i,p,o,n: integer; begin randomize; p: =0; n: =0; o: =0; for i: = 1 to k do       begin       r[i]: =2*random(k)-k;       write(r[i],' ');       if r[i] > 0 then p: =p+1       else if r[i] = 0 then n: =n+1                 else o: =o+1;       end; writeln; writeln('p = ',p); writeln('n = ',n); writeln('o = ',o); end.

двумя байтами (от 0 до 255) можно записать адрес для 65536 ячеек памяти (от 0 до 65535). для большего количества ячеек адрес должен иметь больше байтов.

 

дополнительная информация

озу обеспечивает режимы записи, считывания и хранения информации, причем в любой момент времени возможен доступ к любой произвольно выбранной ячейки памяти. принципиальной особенностью озу является его способность хранить информацию только во время работы пк. после загрузки новой программы, прежнее содержимое озу замещается новым, после выключения пк пропадает вовсе.