мне скоро это здавать умоляю

первым кому удалось расшифровать египетские иероглифы, был французкий ученый жан-франсуа шампольон (1790-1832). он составил полный список иероглифов и их гречиских эквивалентов создав тем самым основу для перевода всех египетских текстов.

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.

program mss; uses crt; var v,m,h,r: real; beginclrscr; writeln('введите радиус'); readln(r); writeln('введите высоту'); readln(h); v: = 3.14*sqr(r)*h; m: = 1200*v; writeln('    ',m: 2: 2,' кг'); readln; end.

однажды мне подарили ноутбук.до этого был старый компьютер.включив ноутбок, я понял, что он намного лучше бережет зрение, нежели компьютер.я стал беречь его, что научило   меня аккуратности.я купил диски, чтоб установить программное обеспечение на ноутбуке в случае форматирования жесткого диска.он мне стал хорошим другом.

что то вроде такого)