1.program z; var a:array [1..10] of integer; i,t:integer; s:real; begin for i:=1 to 10 do begin a[i]:=random(1,100); write(a[i]:4); if (odd(i)) and (odd(a[i])) then begin s:=s+a[i]; t:=t+1; end; end; writeln; write('Cреднее арифметическое = ',s/t); end. 2.program z; var a:array[1..10] of integer; max,i:integer; begin writeln('Исходный массив'); for i:=1 to 10 do begin a[i]:=random(1,100); write(a[i]:4); if a[i]>max then max:=a[i]; end; writeln; writeln('Измененный массив'); for i:=1 to 10 do begin if not(odd(a[i])) then a[i]:=max; write(a[i]:4); end; end.
var a:array [1..10] of integer; i,t:integer; s:real;
begin
for i:=1 to 10 do
begin
a[i]:=random(1,100);
write(a[i]:4);
if (odd(i)) and (odd(a[i])) then
begin
s:=s+a[i];
t:=t+1;
end;
end;
writeln;
write('Cреднее арифметическое = ',s/t);
end.
2.program z;
var a:array[1..10] of integer; max,i:integer;
begin
writeln('Исходный массив');
for i:=1 to 10 do
begin
a[i]:=random(1,100);
write(a[i]:4);
if a[i]>max then max:=a[i];
end;
writeln;
writeln('Измененный массив');
for i:=1 to 10 do
begin
if not(odd(a[i])) then a[i]:=max;
write(a[i]:4);
end;
end.
Исходник ниже.
Объяснение:
#include <iostream>
#include <cmath>
using namespace std;
int main(){
//"\t" - табуляция
//fixed - для вывода фиксированного количества знаков после запятой у вещественного числа
cout << "x\t\ty\t\ta\t\tb\t\tz" << endl;
double x = 0.5;
while(x <= 1.9){
double y = 0.1;
while(y <= 0.2){
double a = cos(x*x*x - sqrt(y));
double b = pow(x * y * y, 1.0 / 3);
double z;
if (a > b){
z = a;
}
else{
z = b;
}
cout << fixed << x << "\t" << y << "\t" << a << "\t" << b << "\t" << z << endl;
y += 0.05;
}
x += 1.1;
}
return 0;
}