Алина очень долго сидела за компьютером, а потом ус- нула. Какие правила безопасности были ею нарушены? Ка-
кой вред могла нанести своему здоровью Алина? Поделись
своим мнением с друзьями.
Кому не трудно
​

1. Не пить за компьютером. 2. Не смотрет. в монитор слишком близко (портиться зрение). 3. Держать ровно осанку.

Объяснение:

используется язык pascal

program pr;

var

  mas: array[1..7] of integer;

  i: integer;

begin

writeln('вводим значения в массив');

  for i: =1 to 7 do readln (mas[i]);

writeln('выводим значения из массива');

  for i: =7 downto 1 do writeln(mas[i]);

readln;

end;

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.