составить блок-схему программы: program proced;
var i,N:integer;
A:array [1..255] of integer; B:array [1..255] of integer; C:array [1..255] of real;
procedure funOne(x :integer);
var g:integer;
begin
for g:=1 to N do
begin
A[g]:=random(91)-43;
write(a[g]:7,'');
end;
writeln;
for g:=1 to N do
begin
B[g]:=random(88)-36;
write(B[g]:7,'');
end;
writeln;
end;
begin
write('Введите кол-во элементов массива N = ');
read(N);
funOne(1);
for i:=1 to N do
begin
C[i]:=(A[i] + B[i]) / 2;
write(C[i]:7:1);
end;
end.

// альтернативный вариант
Uses GraphABC;
Begin
SetWindowSize(900,800);
line(250,100, 300,50);
lineto(350,100);
lineto(250,100);
floodfill(300,70, clgreen);
line(220,200, 300,100);
lineto(380,200);
lineto(220,200);
floodfill(300,150, clgreen);
 line(200,300, 300,200);
lineto(400,300);
lineto(200,300);
floodfill(300,250, clgreen);
rectangle(290, 300,310, 320);
floodfill(300,305, clbrown);
line(0, 300, 100, 350);
 lineto(200, 320);
lineto(400, 320);
lineto(600, 370);
lineto(600,400);
lineto(0,400);
lineto(0,300);
end.

Интернет в России появился в 1990 году, тогда же был зарегистрирован и домен su.
  Обычно историю зарождения русскоязычной части Интернета (Рунета) описывают следующими основными вехами: 22 августа 1990 года – научная сеть Института атомной энергии и ИПК Минавтопрома впервые подключилась к Интернету, поэтому этот день считается днем зарождения русского Интернета.19 сентября 1990 года – первый домен Советского Союза .su был зарегистрирован в международной базе данных.7 апреля 1994 года - первый домен Российской Федерации .ru был зарегистрирован в международной базе данных.