4 года назад

Перечислите устройства, входящие в состав понятия: Персональный компьютер

2 ответа:

kirill345 [17]4 года назад

0 0

Корпус - __________________________________________ модем - __________________________________________ тут посмотри ...-__________________________________________ мышь - может еще трекбол или джостик нипишем ))) __________________________________________ А чё про принтер то ни кто не написал ))) __________________________________________ Дисковод!! ! -интересно, а без Дисковода компьютер может работать ))) а ну да А еще ...)))

katafalk3809104 года назад

0 0

1. Процессор
2. Видеокарта
3. Оперативная память
4. Материнская плата
5. Кулер
6. Корпус
7. Монитор
8. Компьютерная мышь
<span>9. Клавиатура</span>

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

Переведите пожалуйста:1. 1,5 Терабайт в Мегабайты2. 2,5 Гигабайт в килобайты3. 543345 бит в килобайты

Angelika03 [79]

1. 1.5тб=1536гб=1572864 мб
2. 2,5гб=2560мб=2621440кб
3. 543345бит=67918,125 байт=66.326 кб

0 0

4 года назад

Помогите пожалуйста 85 задание !!!

Игорь Коломоец

3 клавиатуры * 2 мыши * 2 гарнитуры = 12 способов

0 0

4 года назад

Задано число n. Требуется найти число от 1 до n, включительно, которое имеет максимальное число положительных целых делителей. Н

alexids [90]

Ответ:

program Delitel;

var

n, i, j, c, d: Integer;

a: array of Integer;

begin

Write ('Введите N: ');

ReadLn (n);

SetLength (a, n + 1);

for i := 1 to n do begin

c := 0;

for j := 1 to i do begin

if i mod j = 0 then

Inc (c);

end;

a [i] := c;

end;

c := 1;

for i := 1 to n do begin

if a [i] > a [c] then

c := i;

end;

WriteLn ('Число ', c, ' имеет ', a [c], ' делителей.');

ReadLn;

end.

0 0

4 года назад

Найти среднее значение целых десятичных чисел кол-во задается с клавиатуры Писать на языке паскаль

Konstantin93

Var i,n,m,sum:integer;r:real;
Begin
Randomize;
write('Введите количество целых десятичных чисел');
Readln(n);
for i:=1 to n do begin
m:=random(100)-50;
write(m:4);sum:= sum + m;end;
writeln;
r:= sum/n;write('среднее значение ', n,' целых десятичных чисел ',r:8:4);<span>end.</span>

0 0

1 год назад

Прочитать ещё 2 ответа

Какую программу написать чтобы найти максимальное из чисел a,b,c ? минимльное из чтырёх чисел?

Евгения садкова

Program abc;
var a, b, c, max: integer;
begin
read (a, b, c);
if a>b then
a:=max
else
b:=max;
if c>max then
c:=max;
writeln ('Максимальное число__', max);
end.
Второй в один вопрос еще))0).

0 0

4 года назад