Исследовать конфигурацию конкретного ПК с сервисных программных средств. При этом: 1) определить набор аппаратных средств (функциональных устройств), их типы, имена, идентификаторы;
2) определить набор установленных системных программных средств, их имена, типы, идентификаторы;
3) дать краткую характеристику (определение, назначение, функции и др.) аппаратным и системным средствам;
4) выделить в отдельную группу компоненты конфигурации, которые можно причислить к аппаратно-программным средствам;
5) определить разрешение экрана и качество цветопередачи;
6) определить тип устройства для клавиатуры;
7) определить тип оборудования для мыши;
8) определить полное имя компьютера и рабочую группу.
// Внимание! Если программа не работает, обновите версию!
a)
begin
var (a,b):=ReadReal2('Введите через пробел два числа:');
if a>b then Writeln('Первое число больше второго')
else
if b>a then Writeln('Второе число больше первого')
else Writeln('Числа равны')
end.
b)
begin
var (a,b):=ReadReal2('Введите через пробел два числа:');
if a<b then Writeln('Первое число меньше второго')
else
if b<a then Writeln('Второе число меньше первого')
else Writeln('Числа равны')
end.