PASCAL ABC .
Найдите решения задачи о выборе положения железнодорожной станции если известны средние затраты на строительство 1 км автомобильной дороги до каждого населенного пункта :
za=530
zb=180
zc=940
требуется найти такое положение железнодорожной станции чтобы затраты на строительство дорог были минимальны.

64*48*12*8=294,912- обьем в байтах 1 стр

пусть х основание системы счисления, тогда:

122х (здесь х должен стоять нижним индексом) = 1*х² + 2*х¹ + 2*х⁰=х²+2х+2 - это десятичная запись исходного числа, значит:

х²+2х+2=65

х²+2х-63=0

д= 4 + 252 = 256

х₁ = (-2-  16)/2 = -9 (не удовлетворяет)

х₂ = (-2 + 16)/2 = 7

ответ. основание системы счисления = 7.

y=2,5*x

x=x*x  |x^2

y=y*x  |2.5*x^3

y=y+1 |1+2.5*x^3

y=y-x  |1+2.5*x^3 - x^2

x=x*x  |x^4

y=y+x  |1+2.5*x^3 - x^2=x^4

y=y*y

program a1;

  uses crt;

  var a: array[1..31] of longint; k,i: integer;

begin

  clrscr;

  for i: =1 to 31 do begin

  write('введите температуру ',i,' числа: ');

  readln(a[i]);  

  if a[i]< 0 then k: =k+1;

  end;

writeln('  количество дней в которые были заморозки = ', k);

readln

end. 

p.s. если паскаль abc, то выделенное писать не обязательно