Create a form for the payment of salaries to Petrov Petr Petrovich. The salary of Petrov P.P. UAH 20,000 on a month, Yaksho vin pratsyuvav less than 10
days, then you pay 40% of your salary, if you pay for 20 days, then you were paid
I will pay a salary plus a bonus of 2000 UAH.
pay for the salary. Vicory by the way buttons, mitki, paports, little ones and viconati
necessary calculation

Одним из ключевых понятий информатики является информация. Теория информации, как раздел математики, сформировалась во второй половине XX в. Толчок к зарождению дали попытки нахождения оптимальных решений практических технических задач в области кодирования и передачи информации. Пионерами теории информации по праву считают Клода Шеннона (США), А.Н. Колмогорова (СССР), Р. Хартли (США).Клод Шеннон, автор теории информации, предложил информацией считать снятую неопределённость наших знаний о чем-то.Шеннон впервые ввёл такую трактовку в теории связи. Позднее она нашла применение во всех областях науки, где играет роль передача информации в самом широком смысле этого слова, в частности, в математической теории информации, большую роль в становлении которой сыграл А.Н. Колмогоров.Существует несколько подходов к определению понятия "информация".

Код Pascal1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 program z1; var p,v:string;     a:array[0..255] of byte;     i,j:byte;   BEGIN write('Слово Пети: '); readln(p); write('Слово Васи: '); readln(v);   if (length(p) = length(v)) then     begin         writeln('Вася использовал все карточки с буквами Пети');         exit;     end;   fillchar(a,255,0); for i:=1 to length(p) do     inc(a[ord(p[i])]);     for i:=1 to length(v) do     dec(a[ord(v[i])]);   write('Не использованы карточки с буквами: ');  for i:=1 to 255 do     for j:=1 to a[i] do         write(chr(i),' '); END.