Постройте квадрат со стороной 10 из точек,используя оператор for
Постройте квадрат со стороной 10 из точек,используя оператор for
Гость
Ответ(ы) на вопрос:
Гостьvar i, j: integer;
begin
for i := 1 to 10 do
begin
for j := 1 to 10 do
if not ((j > 1) and (j < 10) and (i > 1) and (i < 10)) then
Write('.')
else
write(' ');
writeln;
end;
end.
Не нашли ответ?
Похожие вопросы