1.
var
A: array [1..10] of integer;
max, i: integer;
begin
for i:=1 to 10 do // заполнение массива
A[i] := random(100) - 50;
max := -51;
for i:=1 to 10 do // обработка массива
if (A[i] < 0) and (A[i] > max) then
max := A[i];
writeln(max);
end.
2.
var
A: array [1..1000] of integer;
kol, i, N: integer;
begin
readln(N);
for i:=1 to N do // заполнение массива
A[i] := random(100) - 50;
for i:=1 to N do // обработка массива
if A[i] mod 2 = 0 then
inc(kol);
writeln(kol);
end.
1.
var
A: array [1..10] of integer;
max, i: integer;
begin
for i:=1 to 10 do // заполнение массива
A[i] := random(100) - 50;
max := -51;
for i:=1 to 10 do // обработка массива
if (A[i] < 0) and (A[i] > max) then
max := A[i];
writeln(max);
end.
2.
var
A: array [1..1000] of integer;
kol, i, N: integer;
begin
readln(N);
for i:=1 to N do // заполнение массива
A[i] := random(100) - 50;
for i:=1 to N do // обработка массива
if A[i] mod 2 = 0 then
inc(kol);
writeln(kol);
end.
def s_calculator(a,b,c):
return 2*(a*b + b*c + a*c)*(1 + 0.001)
a = 10 * s_calculator(20,20,20)
b = 20 * s_calculator(30,15,10)
if a > b: print('9а')
elif a < b: print('9б')
else: print('одинаково')