Информация может быть определена как: 1) совокупность знаний о фактических данных и зависимостях между ними; 2) все то, что так или иначе зафиксировано в знаковой форме; 3) полученные сведения, являющиеся новыми и доступными; 4)количественная мера устранения неопределенности; 5) сведения об окружающем мире и протекающих в нем процессах, воспринимаемые человеком или специальными устройствами

1, 4, 5 несколько же ответов, верно?

Объяснение:

Напишите программу, которая в последовательности целых чисел определяет, каких чисел больше - чётных или оканчивающихся на 3 - и на сколько. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа по модулю не превышают 30000. Программа должна вывести сообщение и одно число: каких чисел больше - чётных или оканчивающихся на 3 - на сколько, а если количество чисел одинаково, то вывести это количество.

Пример работы программы:

Входные данные:

182

13

12

8

0

Выходные данные

Чётных больше на 2 числа

0

Var   n,i,s,k,p: integer; begin   p: =1;   write('введите число ');   readln(n);   writeln(' среднее арифметическое от 1 до ',n,' = ',(n+1)/2);   for i: =1 to n do begin       if (i mod 3 = 0) and (i mod 2 = 0) then begin           s: =s+i; k: =k+1;       end;       p: =p*i   end;   writeln(' среднее арифметическое целых,чётных,кратных 3 чисел от 1 до ',n,' = ',s/k);   writeln(' произведение чисел от 1 до ',n,' = ',p); end. тестовое решение: введите число 10   среднее арифметическое от 1 до 10 = 5.5   среднее арифметическое целых,чётных,кратных 3 чисел от 1 до 10 = 6   произведение чисел от 1 до 10 = 3628800