Hogyan lehetne azt megoldani hogy ha 90-nél többet írnak a programba akkor előről kezdje?

ciklus

.. kiír("Írj be egy számot (max 90): ");

.. szám := bekér();

amíg (szám > 90);

Repeat

Write ('Add meg az első számot: ');

Readln (f);

Until (f>0) and (f<91)

és így tovább...

"Sokkal egyszerűbb egy goto-t betenni."

A GOTO az ördögtől való, óvakodjatok tőle!

Dijkstra is megmondta már 1968-ban: [link]

;)

Mármint 12.-es vagy 12 éves? :-)

Én tömbbel csinálnám a helyedben.

Kezdőkénti próbálkozásnak jó.

Az viszont nem jó benne ,hogy ugyan azt a számot többször is kisorsolhatja a gép egy játékmenet alatt, mert nem garantált hogy random(90)+1 nem lesz 2x ugyanaz.