Используя текст учебника, распределите программное обеспечение по их видам (запишите в нужный столбик). Дополните примерами из текста учебника. Антивирусные программы, архиваторы, операционные системы, системы автоматизированного проектирования, Мультимедиа проигрыватели, программы обслуживания дисков, системы управления базами данных, бухгалтерские программы, геоинформационные системы, электронные учебники, игры, офисные пакеты, клавиатурный тренажер, язык программирования.
ПО
СПО
(системное ПО) ППО (Прикладное ПО) ИП (инструментарий программирования)
вода и молоко не в бутылке
бут ст кувш бан
мол 0
лим
квас
вода 0
сосуд с лимонадом стоит между кувшином и сосудом с квасом
бут ст кувш бан
мол 0
лим 0
квас 0
вода 0
в банке не лимонад и не вода.
бут ст кувш бан
мол 0
лим 0 0
квас 0
вода 0 0
Стакан стоит около банки и сосуда с молоком
бут ст кувш бан
мол 0 0 0
лим 0 0
квас 0
вода 0 0
бут ст кувш бан
мол 0 0 1 0
лим 0 0
квас 0
вода 0 0 0
бут ст кувш бан
мол 0 0 1 0
лим 0 0
квас 0 1
вода 0 1 0 0
=
бут ст кувш бан
мол 0 0 1 0
лим 1 0 0 0
квас 0 0 0 1
вода 0 1 0 0
лим - бут вода - стак мол - кувш квас - банка
b:array[1..3,1..3] of integer;
c:array[1..3,1..3] of integer;
i,j:integer;
begin;
writeln('A array:');
for i:=1 to 3 do
begin;
writeln;
for j:=1 to 3 do
begin;
a[i,j]:=random(-10,10);
write(a[i,j]:4);
end;
end;
writeln;
writeln('B array:');
for i:=1 to 3 do
begin;
writeln;
for j:=1 to 3 do
begin;
b[i,j]:=random(-10,10);
write(b[i,j]:4);
end;
end;
writeln;
writeln('C array:');
for i:=1 to 3 do
begin;
writeln;
for j:=1 to 3 do
begin;
c[i,j]:=a[i,j]*b[i,j];
write(c[i,j]:4);
end;
end;
end.
2)var a:array of array of integer;
i,j,k,n,u:integer;
begin;
randomize;
readln(n);
setlength(a,n+1);
for i:=1 to n do
setlength(a[i],n+1);
writeln('A array:');
for i:=1 to n do
begin;
writeln;
for j:=1 to n do
begin;
a[i,j]:=random(-10,10);
write(a[i,j]:4);
end;
end;
for i:=1 to n do
begin;
for j:=1 to n do
u+=a[i,j];
if u<0 then inc(k);
u:=0;
end;
writeln;
write('Result:',k);
end.