Ahoj,
jak ma vypadat program, do ktereho kdyz napisu napr. cislo 10, tak mi vypise cisla pozpatku: 10, 9, 8 apod... pod sebe.

Kdyz udelam:

program vypsanin;
var
x,y:integer;

begin
writeln ('Zadejte prosim cislo');
readln (x);
while x>0 do

A ted nevim jak pokracovat a jestli mam vubec podminku dobre.
Predem dekuju za pomoc