Компьютер имеет объем оперативной памяти 0.5 кбайт. адреса машинных слов меняются с шагом 2. сколько машинных слов составляют оперативную память компьютера​

Объяснение:

Некоторый сегмент сети Интернет состоит из 1000 сайтов. Поисковый сервер в автоматическом режиме составил таблицу ключевых слов для сайтов этого сегмента. Вот её фрагмент:

КЛЮЧЕВОЕ СЛОВО:

сомики

меченосцы

гуппи

КОЛИЧЕСТВО САЙТОВ, ДЛЯ КОТОРЫХ ДАННОЕ СЛОВО ЯВЛЯЕТСЯ КЛЮЧЕВЫМ:

250

200

500

По запросу сомики & гуппи было найдено 0 сайтов, по запросу сомики & меченосцы - 20 сайтов, а по запросу меченосцы & гуппи - 10 сайтов.

Сколько сайтов будет найдено по запросу сомики | месячном | Гуам?

Для скольких сайтов рассматриваемого сегмента ложно высказывание "Сомикм ключевое слово сайта ИЛИ меченцы - ключевое слово сайта"?

Uses
  Crt;
var
  i,n:integer;
  a,s:real;
begin
  Writeln('Вычисление среднего арифметического');
  Writeln('последовательности действительных чисел');
  Write('Введите количество чисел последовательности ->');
  Readln(n);
  Writeln('Введите последовательность. После ввода каждого числа нажмите Enter');
  s:=0;
  for i:=1 to n do
  begin
    Read(a);
    s:=s+a
  end;
  Writeln('Среднее арифметическое введенной последовательности: ',s/n);
  Write('Для завершения работы программы нажмите Enter');
  Readkey
end.

Тестовое решение:
Вычисление среднего арифметического
последовательности действительных чисел
Введите количество чисел последовательности ->5
Введите последовательность. После ввода каждого числа нажмите Enter
5.4
7.8
3.0
1.5
2.3
Среднее арифметическое введенной последовательности: 4
Для завершения работы программы нажмите Enter

Для версии Pascal.ABC.Net:
var
  i,n:integer;
  a,s:real;
begin
  Writeln('Вычисление среднего арифметического');
  Writeln('последовательности действительных чисел');
  Write('Введите количество чисел последовательности ->');
  Readln(n);
  Writeln('Введите последовательность. После ввода каждого числа нажмите Enter');
  s:=0;
  for i:=1 to n do
  begin
    Read(a);
    s:=s+a
  end;
  Writeln('Среднее арифметическое введенной последовательности: ',s/n)
end.