Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Problem] Program, potrzebna pomoc.


Rekomendowane odpowiedzi

Opublikowano

Witam, mam program do napisania. Potrzebuję go napisac, mam ciężką sytuację w szkole, a on pomogłbymi jakoś się uratowac.

Otóz musze zrobic program ktory np po wpisaniu liczby 2 zrobi nam cos takiego :

 

12
43

 

a po wpisaniu np 5:

 

12345
161718196
152425207
142322218

131211109

 

 

chodzi o takie zaplatanie w weza jakby...

 

jak podam 2 to 2x2 jak 5 to 5x5

 

kto rozumie, o co mi chodzi ten zrobi...

 

Kupię doładowanie za dyszke komus, jesli ktos poswieci dla mnie troszke czasu:)

Opublikowano

Jedyne co mi przychodzi do głowy po twojej wypowiedzi to dwuwymiarowa tablica której efekt działania wygląda mniej-więcej tak:
ceda33cdcb.png

 

uses
	crt;
var
	tablica:array[1..50,1..50] of byte;
	i,j,k:byte;

begin
	clrscr;
	write('wypisz liczbe po ktorej zrobie cos...  ');
	readln(k);
	writeln('  ');
	randomize;
	for i:=1 to k do begin
		for j:=1 to k do begin
		tablica[i][j]:=random(99)+1;
		end;
	end;
	for i:=1 to k do begin
		for j:=1 to k do begin
		if(j<k) then
		write(tablica[i,j]:2, ' ') else
		writeln(tablica[i,j]:2);
		end;
	end;
	readkey;
end.

 

 

Jeżeli chodzi o coś innego spróbuje to wytłumaczyć jak człowiek.

  • 2 miesiące temu...

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...