??? Ээээ... Аммм...ээх! Всё равно НЕ ПОНЯТНО!
const
n = 5; m = 5;
var
a: <em>array [0..m, 0..n] of shortint</em>;
i, b, c: <em>integer</em>;
begin
for i := 1 to m do
begin
for b := 1 to n do
begin
a[i, b] := random(-90, 0);
write(a[i, b]:4);
if (i = m) then
if (a[i, b] mod 4 = 0) then
c += 1;
end;
writeln(<em>(i = m) and (b = n)</em> ? ' ' + c : '');
end;
writeln();
<span>end.</span>
<span>Цикл с предусловием </span>
<span><span>Цикл с постусловием</span></span>
<span><span><span>Цикл со счётчиком</span></span></span>
1) 360/60 = 6
6 угольник должен получиться, но программа повториться всего 5 раз, поэтому получится ломаная
2) 360/120 = 3
Треугольник получится (так как 3 угла)
Ответ: 1 - 4) 2 - 4)