Когда сломался компьютер, его хозяин сказал: «оперативная память не могла выйти из строя». сын хозяина компьютера предположил, что сгорел процессор, а жёсткий диск исправен. пришедший специалист по обслуживанию сказал, что, скорее всего, с процессором всё в порядке, а оперативная память неисправна. в результате оказалось, что двое из них сказали всё верно, а третий — всё неверно. что же сломалось?

program xxx;

    var i, n : integer;

                a, d : real

                      s: array[1..20] of real;

begin

    write('введите n-');

    readln (n);

    write('введите а=');

    readln(a);

    write('введите d=');

    readln(d);

    s[1]: =a;

    for i: =2 to n do

        s[i]: =a+d;

    write('арифметическая прогрессия: ');  

    for i: =1 to n do

              write(s[i]);

end.

а)400*2,5=1000кб

б)64: 2,5=25,6=25(страниц)

в)нужен диск cd-r ,cd-rw