Задание в Excel или на языке программировнания?
Pascal:
const n=20;
var a: array[1..n] of integer;
max, min, i: integer;
begin
max:=-11;
min:=11;
for i:=1 to n do begin
a[i]:=random(20)-10; {или readln(a[i]); если нужен конкретный ввод}
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
end;
writeln((max+min)/2);
end.
Var x,s:integer;
begin
s := 0;
read(x);
while x <> 0 do
begin
if (x mod 3 = 0) and (x mod 10 = 4)
then s := s + x;
read(x)
end;
write(s)
end.
А:=3
b:=5
c:=9
3mod3=0 (делится нацело), значит v:=1*3=3; t:=1; u:=3
5mod3=0 (не делится нацело) - не верно, действия не выполняются
9mod3=0 (делится нацело), значит v:=3*9=27; t:=2; u:=3+9=12
v=27 t=2 u=12