Witam serdecznie, mam do napisania program, który na ekranie konsoli wypisze znaki, które ułożą się w kształt literki, np. Z, A, X lub L. Na początku chciałbym napisać wersję dla Z.
Program powinien działać na takiej zasadzie, że użytkownik podaje wielkość n (4) i na ekranie wypisuje literkę:
ZZZZ
Z
Z
ZZZZ
Analogicznie gdy podam inne n to będzie się to odpowiednio skalować.
Całość musi być "zamknięta" w tablicy. Jak widać dla n=4 jest to tablica [0..3][0..3]
Przyznam się, że brakuje mi pomysłów jak to napisać. Jedyne co do tej pory napisałem to procedura rysuj, która wypełnia tablicę znakami i w sumie to tyle. Domyślam się, że niektóre elementy tablicy powinienem zastąpić pustym znakiem (spacja) ale tylko jak to odpowiednio napisać hmm? :)
Za bardzo też nie wiem jak szukać rozwiązań za pomocą googla, chyba złe frazy dobieram... :P
Najważniejsza część poniżej:
program rysowanie;
const MAX = 100;
type
znak = array[0..MAX-1, 0..MAX-1] of char;
var
tab:znak;
n:integer;
{procedura dla literki Z}
procedure rysuj(var tab:znak; n:integer);
var i, j:integer;
begin
for i:=0 to n-1 do
begin
for j:=0 to n-1 do
begin
write('Z');
end;
writeln();
end;
end;
{glowny program}
begin
writeln('podaj n: ');
readln(n);
rysuj(tab, n);
readln();
end.