a=100
b=30
a=100-b*3(100-90)
(a=10)
a не больше b следовательно
c=b-a
c=30-10
c=20
program mas;
var A:array[1..4,1..6] of integer;
i, j: integer;
summ: integer;
id: integer;
begin
randomize;
for i := 1 to 4 do
begin
for j := 1 to 6 do
begin
A[i, j] := random(30) + 45;
write(A[i,j]);
write(' ');
end;
writeln('');
end;
for j := 1 to 6 do
begin
for i := 1 to 4 do
begin
summ := summ +A[i, j];
end;
writeln(summ / 4);
summ := 0;
end;
readln;
end.
После выполнения у будет равен 17
Скорее всего, в задании требуется написать программу. На паскале это будет так:
var s:real; i:integer;
begin
s:=0;
for i:=1 to 10 do s:=s+cos(i);
writeln('s = ',s);
end.
1) y:=x-((sqr(x)*x)/3)+((sqr(x)*sqr(x)*x)/5);
2) z:=exp(-x*ln(2))-cos(x)+sin(2*x*y);
3) y:=(sqr(x)-7*x+10)/(sqr(x)-8*x+12);
4) y:=x-10*sin(x)+abs(sqr(x)*sqr(x)-sqr(x)*sqr(x)*x);