Системный блок:
-корпус
-блок питания
-материнская плата
-процессор
-видеокарта
-оперативка
-жесткий диск
-дисководы
Монитор
Мышка
Клавиатура
Берешь мышь в руки, двигаешь ею стрелку к меня пуск далее в строке пишешь paint и там в списке он будет, нажимаешь на нее и пользуешься на здоровье
Будет выведен файл состоящий из пяти символов вторым из которых будет 2
//Pascal ABC.NET v3.0 сборка 1111
Var
ars:array[1..50] of string;
ark:array[1..50] of integer;
s:string;
i,n,k,j:integer;
begin
readln(n);
k:=0;
for i:=1 to n do
begin;
readln(ars[i]);
for j:=1 to 4 do
delete(ars[i],1,pos(' ',ars[i]));
s:=ars[i];
if (s[1]='6') or (s[1]='7') or (s[1]='8') then
begin;
inc(k);
ark[k]:=i;
end;
end;
writeln(k);
for i:=1 to k do
writeln(ark[i]);
<span>end.
Пример ввода:
2
Петров Петр Петрович 10 6 2007
<span>Иванов Иван Иванович 10 2 2007
Пример вывода:
1
<span>1</span></span></span>