задача. Информационный объем статьи 96 Кбайт. сколько страниц займет статья, если на одной странице электронного документа помещается 32 строки по 64 символа, а каждый символ занимает 8 бит памяти?

var

i,j,s: integer;

x: array[1..8,1..8] of integer;

y: array[1..10,1..10] of integer;

begin

s: =0;

for i: =1 to 8 do

for j: =1 to 8 do

begin

readln(x[i,j]);

if i< =j then s: =s+x[i,j];

end;

writeln("сумма для x=", s);

s: =0;

for i: =1 to 10 do

for j: =1 to 10 do

begin

readln(y[i,j]);

if i< =j then s: =s+y[i,j];

end;

writeln("сумма для y=", s);

end.

var a: array[1..100] of integer;

i,ms,ps: integer;

begin

  {vvod massiva a}

  for i: = 1 to 100 do

    if a[i] > 0 then ps: =ps+a[i]

    else ms: =ms+a[i];

  writeln(ps,ms);

end.

если прямые не пересекаются, то они или скрещиваются или паралельные

неверно, что на ноль делить нельзя, делить можно, только результатом будет или бесконечность или неопределенность

неверно, что две неодинаковые прямые могут иметь две общие точки

неверно, что ответ может быть правильным или неправильным. в любом ответе есть доля истины и доля лжи

с: =(a+b)*(b-a) должно быть ну и тогда с это разность квадратов а и в