Pascal: 1) const n = 10; var a:array [1..n] of integer; i:integer; begin randomize; for i:=1 to n do begin a[i]:=random(21)-10; write (a[i]:3); end; writeln; for i:=1 to n do begin if a[i]>0 then a[i]:=99; write (a[i]:3); end; writeln; end.
2) const n = 10; var a:array [1..n] of integer; p,s,i:longint; begin p:=1; s:=0; randomize; for i:=1 to n do begin a[i]:=random(21)-10; if a[i]>0 then p:=p*a[i] else if a[i]<0 then s:=s+a[i]; write(a[i]:3); end; writeln; writeln ('Proizvedenie: ',p); writeln ('Summa: ',s); end.
1)
const n = 10;
var a:array [1..n] of integer;
i:integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(21)-10;
write (a[i]:3);
end;
writeln;
for i:=1 to n do
begin
if a[i]>0 then a[i]:=99;
write (a[i]:3);
end;
writeln;
end.
2)
const n = 10;
var a:array [1..n] of integer;
p,s,i:longint;
begin
p:=1;
s:=0;
randomize;
for i:=1 to n do
begin
a[i]:=random(21)-10;
if a[i]>0 then p:=p*a[i] else
if a[i]<0 then s:=s+a[i];
write(a[i]:3);
end;
writeln;
writeln ('Proizvedenie: ',p);
writeln ('Summa: ',s);
end.
C++:
1)
#include <iostream>
#include <ctime>
#include <cstdlib>
using namespace std;
int main()
{
int a[10];
srand (time(NULL));
for (int i = 0; i<10; i++)
{
a[i] = rand()%20-10;
cout <<a[i] <<" ";
if (a[i]>0)
a[i] = 99;
}
cout <<endl;
for (int i = 0; i<10; i++)
cout <<a[i] <<" ";
cout <<endl;
return 0;
}
2)
#include <iostream>
#include <ctime>
#include <cstdlib>
using namespace std;
int main()
{
int a[10];
int p = 1,s = 0;
srand (time(NULL));
for (int i = 0; i<10; i++)
{
a[i] = rand()%20-10;
cout <<a[i] <<" ";
if (a[i]>0)
p*=a[i];
else if (a[i]<0) s+=a[i];
}
cout <<endl;
cout <<"Summa: " <<s <<endl
<<"Proizvedenie: " <<p <<endl;
return 0;
}
import static java.lang.Math.*;
class MySolution {
public static void main(String[] args) {
double min = sin(pow(0, 2) + 5 * 0) * cos(3 * pow(0, 2) - 0), minArg = 0;
for (double x = 0.4; x < 8; x += 0.4) {
double y = sin(pow(x, 2) + 5 * x) * cos(3*pow(x, 2) - x);
if (y < min) {
min = y;
minArg = x;
}
}
double[] A = new double[1];
A[0] = min;
System.out.printf("Наименьшее значение функции: " + A[0] + "\nПри значении аргумента x: " + "%.1f", minArg);
}
}