Определите, является ли предложение высказыванием (обоснуйте ответ). Если предложение является выказыванием, определите его истинность.
a. Все углы квадрата прямые.
b. Кто сказал «Мяу»?
c. Запишите домашнее задание
d. Зима – лучшее время года.
e. Диагонали ромба пересекаются под прямым углом.
f. Зима – лучшее время года.
g. Х+1=5.
h. Кто сказал «Мяу»?

Рабочий стол:

— значки и ярлыки объектов Windows

— окна открытых приложений

— панель задач, содержащая кнопку «Пуск», панель индикации и ряд панелей инструментов Рабочего стола

— подложка Рабочего стола, содержащая однородный фон, фоновый рисунок или активные элементы рабочего стола.

По ходу работы на Рабочем столе могут быть дополнительные объекты: окна папок, диалоговые окна, окна приложений и т. д.

После входа пользователя в систему на экране появляется Рабочий стол, оформление которого зависит от выбранной темы. Тема определяет фоновый рисунок, набор звуков, значков и других элементов Рабочего стола. Выбрать фоновый рисунок, набор звуков и значков Рабочего стола позволяет диалоговое окно Свойства: Экран.

Изготовление шевронов

Const
  n = 20;

var
  T: array[1..n] of integer;
  mean: real;
  i, k: integer;

begin
  writeln('Введите ', n, ' элементов массива');
  for i := 1 to n do
  begin
    read(T[i]);
    mean := mean + T[i]
  end;
  mean := mean / n;
  k := 0;
  writeln(#13#10, 'Введено: ');
  for i := 1 to n do write(T[i]:5);
  writeln(#13#10, 'Элементы массива, превышаюшие среднее арифметическое ',
      mean:0:2);
  for i := 1 to n do
    if T[i] > mean then
    begin
      write(T[i]:5);
      k := k + 1
    end;
  writeln(#13#10, 'Найдено элементов, превышаюших среднее арифметическое: ', k)
end.

Тестовое решение:

Введите 20 элементов массива
5 17 28 45 -20 34 9 18 42 -36 18 36 0 24 5 45 -7 12 1 21

Введено:
    5   17   28   45  -20   34    9   18   42  -36   18   36    0   24    5   45   -7   12    1   21
Элементы массива, превышаюшие среднее арифметическое 14.85
   17   28   45   34   18   42   18   36   24   45   21
Найдено элементов, превышаюших среднее арифметическое: 11