Какие законы существуют в России в области компьютерного права? Выберите один или несколько ответов: - id1352743620210502 от Alina29052006 02.05.2021 06:47

Question

Информатика: Какие законы существуют в России в области компьютерного права? Выберите один или несколько ответов: об информации, информатизации, защищенности информации 1 о гражданском долге 2 о правовой ответственности 3 о персональных данных 4 о государственной тайне 5 о правовой охране программ для ЭВМ и БД

Alina29052006 · Accepted Answer

Я решала эту задачу ...с горем - по - полам .. простите :(..
в ней должны быть равны элементы стоящие в одной побочной диагонале. всего побочных диагоналей n+m-1.
достаточно хранить первую строку и последний столбец,

var n, m, i, j, b : integer;
a : array [1..30000] of integer;
t : boolean; begin assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
readln(n,m);
while n+m>0 do
begin
t:=true;
for j:=1 to m do
read(a[j]);
for i:=2 to n do begin
for j:=1 to m-1 do begin
read(b);
t:=t and (b=a[i+j-1]) end;
read(b);
a[m+i-1]:=b end;
if t then write('Y') else write('N');
readln(n,m) end;
close(output) ;
end.

MOGZ ответил