4 года назад

Какие вы знаете переферийные устройства?

2 ответа:

0 0

Устройство-ввода(мышь,клавиатура.экран)
устройство-вывода(мониторы,принтеры)
устройство-хранения(ленточные,дисковые-устройства)

Daimond4 года назад

0 0

Мышь, клавиатура, веб-камера, наушники, микрофон, монитор, принтер, флешка

Читайте также

Паскаль. Дан одномерный массив, значения которого вводятся с клавиатуры . Вычислить количество отрицательных элементов данного м

roman23r5 [2.3K]

Var a:array[1..100] of integer;
I,c,n:integer;
Begin
Readln(n);
For i:=1 to n do
Begin
Read(a[i]);
Write(a[i],' ');
If a[i]<0
Then c:=c+1;
End;
Writeln('кол-во отриц.=',c);
End.

0 0

4 года назад

Сколько значащих нулей в двоичной записи десятичного числа 503 информатика 9 класс ПОЖАЛУЙСТА

Асянастя [8]

503(10) = 111110<span>111(2)
Ответ: 1.
</span>

0 0

4 года назад

РЕБЯТКИ, ПОМОГИТЕ, ПОЖАЛУЙСТА!!! ОЧЕНЬ НУЖНО!!! Задача Pascal (во вложениях) данные типа spring. Пожалуйста, напишите задачу!

Алена2

var
Str1,c : string;
l,i : integer;
r : boolean;

begin
readln (Str1);
r := true;
i := 1;
l := Length (Str1);

While (r) and (i <= l) do
begin
c := copy (Str1,i,1);
  if (c <> '1') and (c <> '0') then
r := false;
i := i + 1;
end;

if r then
{writeln ('Ok')}
else
writeln ('Недопустимый символ!');
<span>end.</span>

0 0

4 года назад

СРОЧНО!! ПОМОГИТЕ ПОЖАЛУЙСТА Нужно найти максимальный элемент главной диагонали матрицы (делфи). Делаю вот так, но ничего не по

Мария724

procedure TForm1.Button3Click(Sender: TObject); //поиск максимального элемента

...

begin

...

Max:= StrToFloat(strngrd1.Cells[0,0]);//присвоим значение 1 элемента

for i:=0 to strngrd1.ColCount - 1 do //цикл по столбцам

for j:=0 to strngrd1.RowCount - 1 do //цикл по строкам

...

end;

0 0

4 года назад

Идеи каких из изоброженых приборов были использованы при создания персональных компьютеров?

ЧИМПОЕШ АЛЕКСАНДР

Полагаю, печатная машинка (телеграф? факс?), а вообще, он ещё функции граммофона, диктофона и телефона объединил:) Ну... О плите и пылесосе промолчу, ибо юмор

0 0

4 года назад