текст: happy new year, dear содержит 30 символов. при кодировании текста с acsii каждый символ кодиреутся 8 битами или 1 байтом, следовательно
30 символов = 30 байт или 30 * 8 = 240 бит
Ответ дал: Гость
var a: array [1..9] of real;
s,p: real;
begin
p: =1;
s: =0;
for i: = 1 to 9 do
begin
read(a[i]);
s: = s+a[i];
p: =p*a[i];
end;
writeln("summa=",s);
writeln("srednee arefmeticheskoe=",s/n);
writeln("proizvedenie=",p);
end.
Ответ дал: Гость
type array100 = array [1..100] of integer; var x,y: array100; i,n,min,max: integer; begin randomize; n: =10; for i: = 1 to n do begin x[i]: =random(n*10)- 10*n div 2 ; write(x[i]: 4); if i mod 10=0 then writeln; end; min: =1; max: =1; for i: = 1 to n do begin if x[i]< x[min] then min: =i; if x[i]> x[max] then max: =i; end; i: =x[min]; x[min]: =x[max]; x[max]: =i; writeln; for i: = 1 to n do begin write(x[i]: 4); if i mod 10=0 then writeln; end; end.
Популярные вопросы