1) -
2) 20 18 14 8 0 -10 -22 -36 -52 -70
3) 4
код полностью
var
a: array[1..10] of integer;
i, k: integer;
begin
for i := 1 to 10 do
begin
a[i] := 20 - i * (i - 1);
write(a[i], ' ');
end;
writeln;
K := 0;
for i := 1 to 10 do
if a[i] > i then k := k + 1;
Write(k);
writeln;
end.
Program z1;
var x:integer;
begin
for x:=100 to 999 do
if (x mod 11=0)and(x mod 3=0) then
write (x,' ');
end.
1. x = 111000
2. x = 70
3. x = 211
4. x = 572
5. x = 124
6. x = 38
7. x = 13.1
8. x = 18.25
9. x = 42.25
Г А 1 (в Г одна дорога - из А)
В АГ 2 (в В две дороги из А и Г)
Б АВ 3
Е БВГ 6
Д Б 3
К ДЕ 9 ответ 9