Ответы
Ответ дал:
1
Відповідь:program DrawStar;
uses crt;
var
i, j: integer;
begin
clrscr;
for i := 1 to 5 do
begin
for j := 1 to 5 - i do
write(' ');
for j := 1 to 2 * i - 1 do
write('*');
writeln;
end;
readln;
end.
Пояснення:
Вас заинтересует
2 месяца назад
1 год назад
1 год назад