Var i,n,m,sum:integer;r:real;
Begin
Randomize;
write('Введите количество целых десятичных чисел');
Readln(n);
for i:=1 to n do begin
m:=random(100)-50;
write(m:4);sum:= sum + m;end;
writeln;
r:= sum/n;write('среднее значение ', n,' целых десятичных чисел ',r:8:4);<span>end.</span>
• текстовую
• графическую
• звуковую
• видеоинформацию
• мультимедиа информацию
Называют ссылкой,
например, А2, С4
А В С... заголовки столбцов
1 2 3 ... заголовки строк
А) a*a+x*x/(y*y) или sqr(a)+sqr(x)/sqr(y)
б) sqrt(a*a+b*b) или sqrt(sqr(a)+sqr(b))