Var a, b, c :integer; g :string;
begin
g:=('Нет');
readln(b);
for a:=1 to b do
begin
readln(c);
if (c>999) and (c mod 2<>0) and (c<10000) then
g:=('Да');
end;
writeln(g);
end.
Ответ:
Системное ПО: ОП-операционная система. Windows, Linux, Mac OS
Прикладное ПО: My Photo Books - средство, предназначенное для создания красивых цифровых фотоальбомов. Adobe Photoshop
Инструментальное ПО: Paint.NET
Объяснение:
<span>Загрузчик операционной системы
</span>