Требования безопасности перед началом работы:
1. Запрещено входить в кабинет в верхней одежде, головных уборах, с громоздкими предметами и едой
2. Запрещено входить в кабинет информатики в грязной обуви без бахил или без сменной обуви
3. Запрещается шуметь, громко разговаривать и отвлекать других учащихся
4. Запрещено бегать и прыгать, самовольно передвигаться по кабинету
5. Перед началом занятий все личные мобильные устройства учащихся (телефон, плеер и т.п.) должны быть выключены
6. Разрешается работать только на том компьютере, который выделен на занятие
7. Перед началом работы учащийся обязан осмотреть рабочее место и свой компьютер на предмет отсутствия видимых повреждений оборудования
8. Запрещается выключать или включать оборудование без разрешения преподавателя
9. Напряжение в сети кабинета включается и выключается только преподавателем
i:integer;
a,b,c:array[1..10]
of integer;
begin
writeln('Массив A:');
for i:=1 to 10 do
begin
a[i]:=random(10);
if i mod 2=0 then c[i-1]:=a[i];
write(a[i],' ');
end;
writeln;
writeln('Массив B:');
for i:=1 to 10 do
begin
b[i]:=random(10);
if i mod 2=0 then c[i]:=b[i];
write(b[i],' ');
end;
writeln;
writeln('Массив C:');
for i:=1 to 10 do
write(c[i],' ');
end.