var a:array[1..10] of integer;
i,s:integer;
Begin
randomize;
for i:= 1 to 10 do begin
a[i]:= random(100);
s:=s+a[i];
end;
writeln(s);
End.
var a:array[1..10] of integer;
i,mk,pk,s,p:integer;
Begin
randomize;
p:=1;
for i:= 1 to 10 do begin
a[i]:= random(30+10)-10;
if a[i]>=0 then begin
pk:=pk+1;
s:=s+a[i];
end
else begin
mk:=mk+1;
p:=p*a[i];
end;
end;
writeln(pk,s,mk,p);
End.
Микрофон-запись звуковых данных
Сканер-представление графической информации в электронном виде
Монитор-вывод графической информации
Мышь-преобразование движения в управляющий сигнал
Наушники-вывод звуковой информации
Процессор-обработка данных
Принтер-вывод графической информации
Командный интерфейс - особенность: работает только с командами, нет графики
Графический интерфейс - особенность: графически-обустроенный интерфейс
Объектно-ориентированный интерфейс - особенность: объединение двух графический интерфейсов | преимущества: легок в управлении