Спрохождением салли фейс на телефоне. какой пароль от двери нужно ввести я дошла до момента с дверью с кодовым замком. когда вводишь 999999999, то вылетает число 2.347652. понятия не имею, какой там пароль

1) var a, b, l: real; begin write('введите a, b> > '); read(a, b); l: =(a+b)/2; writeln(l); end.2)var a, b: integer; beginwrite('введите 2 числа> > '); read(a, b); if a< b then writeln(a) else writeln(b); end.3)var a1, d, n, sr: real; beginwrite('введите a1, d> > '); read(a1, d); n: =15; sr: =a1+d*(n-1); writeln(sr); end.4)vara, d, p: real; i: byte; beginwrite('введите первую сторону> > '); read(a); for i: =1 to 8 dobeginp: =p+a; a: =a+2; end; writeln('p = ', p); end.

Var   m,t,s,i: integer; begin   write('сколько часов пух не вставал из-за стола: ');   readln(t);   if t=1 then writeln('через 1 час - 100 грамм')   else   begin       s : = 100;       m : = 100;       for i: = 2 to t do       begin           s : = s+50;           m : = m + s;       end;       writeln('через ',t,' часов',m,' грамм');   end; end.