Var a:array[1..10] of integer;
i:integer;
begin
i:=1;
repeat
readln(a[i]);
i:=i+1;
until i>10;
end.
Может А варианты шгар. или В. точно блмедим.
As, ad, ac, az, sa, sd, sc, sz, da, ds, dc, dz, ca, cs, cd, cz, za, zs, zd, zc.
Использовать Чертежник
алг Звезды
нач
нц 2 раз
поднять перо
сместиться на вектор (8,0)
опустить перо
сместиться на вектор (3,6)
сместиться на вектор (3,-6)
сместиться на вектор (-6,4)
сместиться на вектор (6,0)
сместиться на вектор (-6,-4)
поднять перо
<span>кц</span>
ОКЕАН МОРЕ РЕКА
Тихий океан. Азовское Волга
Индийский Черное Дон