Const n = 20;
<span>var </span><span> arrA, arrC: array[1..n] of real;
</span><span>i, j: byte;
</span><span>sum: real;</span>
begin
<span> randomize;</span><span>
writeln('Array A:');</span><span>
for i:=1 to n do begin</span><span>
arrA[i] := random() * 10 - 5;
</span><span> write(arrA[i]:6:2);</span><span>
if i mod 10 = 0 then writeln;</span><span>
end; </span>
<span> i := 2;</span><span>
j := 0;</span><span>
sum := 0;
</span><span> while i <= n do begin
</span><span> if arrA[i] > 0 then begin</span><span>
j := j + 1;
</span><span> arrC[j] := arrA[i];
</span><span> sum := sum + arrC[j] * arrC[j];
</span><span>
end;</span><span>
i := i + 2;</span><span>
end;</span>
<span> writeln('Array C:');
</span><span> for i:=1 to j do write(arrC[i]:6:2);</span><span>
writeln;
</span><span> writeln('sq.sum = ', sum:5:2);
</span> <span>end.</span>
Мы тоже такое сегодня решали))) 450-550 г
Dieter Bohlen wurde am 7.Februar 1954 in Berne (Deutschland) geboren.Er ist ein deutscher Musiker und Songwriter.In den 80- er war er Mitglied des Pop-Duos Modern Talking. Noch in der Schule komponierte er Musik.Bohlen studierte an der Universität in Göttingen.Sein Studium schloss er als Diplom-Kaufmann ab.1985 erschien sein erstes Album.Er beteiligte sich in zahlreichen musikalischen Wettbewerben.Jetzt singt er in eigener Gruppe Blue System.Dieter Bohleb ist einer der erfolgreichsten Musiker Deutschlands.
В и б.
Так как от<span> ударной волны, радиоактивного заражения и хим. оружия.
</span>
Ну как минимум,литература помогает саморазвитию.Может,ты прочтешь какие-то стихи и сам начнешь их писать,так же рассказы,новеллы.И в многих произведениях есть смысл,заставляет задуматься и т.д.Как по мне литература очень важна,надо знать не только авторов своей страны,но и всего мира!Как-то так...