Program day; var a: array[1..30] of integer; b, s, i, min: integer; begin min := 999; Randomize; for i := 1 to 30 do begin a[i] := random(9, -3); s := s + a[i]; Write(a[i]:3); end; Writeln; Writeln('Ниже нуля '); for i := 1 to 30 do begin if a[i] > 0 then Write(i,'-го '); end; if a[i] = 0 then b := b + 1; Writeln; for i := 1 to 30 do if a[i] < min then min := a[i]; Writeln('Самая низкая температура - ', min); Writeln('Средняя температура ноября ', s / 30); end.
я просто ищу все простые числа в диапазоне от 1 до n с решето эратосфена, а далее просто сравниваю вектор с простыми числами.
мой пример решения:#include
#include
using namespace std;
int main()
{
int n;
cin > > n;
vector prime (n+1, true);
prime[0] = prime[1] = false;
for (int i=2; i*i< =n; ++i)
if (prime[i])
for (int j=2; j< =n/i; j++)
if (prime[i*j]) prime[i*j] = false;
for(int i = 0; i < prime.size(); ++i)
{
for(int j = i; j < prime.size(); ++j)
{
if(prime[i]& & prime[j])
if(i+j==n)
cout < < i < < " " < < j < < endl;
}
}
cin.get();
cin.get();
}
var
a: array[1..30] of integer;
b, s, i, min: integer;
begin
min := 999;
Randomize;
for i := 1 to 30 do begin
a[i] := random(9, -3);
s := s + a[i];
Write(a[i]:3);
end;
Writeln;
Writeln('Ниже нуля ');
for i := 1 to 30 do begin if a[i] > 0 then Write(i,'-го ');
end;
if a[i] = 0 then b := b + 1;
Writeln;
for i := 1 to 30 do
if a[i] < min then min := a[i];
Writeln('Самая низкая температура - ', min);
Writeln('Средняя температура ноября ', s / 30);
end.