Program znanijacom;
uses crt;
var
n:string;
i,k,r,c,b:integer;
num:array [1..4] of char;
begin
writeln('vvedite celoe chislo <1000:');
read(n);
k:=length(n);
writeln('Cufr v chisle: ',k);
for i:=1 to k do
begin
num[i]:=n[i];
val(num[i],c,b);
r:=r+c;
end;
writeln('Ux cymma : ',r);
end.
Program n1;
var a,b,i: integer;
sum,k: real;
begin
sum:=0;
k:=0;
readln(a,b);
for i:=a to b do
begin
sum:=sum+i*i;
k:=k+1;
end;
writeln(sum/k:6:2);
end.
Shift + Alt типично. или в настройках языка
Про "виды" устройств не понятно, а основные устройства без которых компьютер не будет работать такие:
Процессор, материнская плата (на ней же BIOS, оперативная памятьи тд), жесткий диск, контроллер (хотя в данном случае может и не нужен, так как управляет внешними устройствами), блок питания
Этого достаточно, чтоб компьютер работал. А вот чтоб человек мог работать с компьютером еще необходимы устройства взаимодействия или ввода/вывода
Хотя если компьютер является сервером, то достаточно сетевой платы
Использовать Робот
алг
нач
нц пока не справа свободно
закрасить
вниз
кц
нц пока справа свободно
вниз
кц
нц пока не справа свободно и снизу свободно
закрасить
вниз
кц
нц пока не снизу свободно
закрасить
влево
кц
нц пока снизу свободно
влево
кц
нц пока не снизу свободно и слева свободно
закрасить
влево
кц
кон