Pascal - Konsolowe

Odwrotność liczb

Odwrotność liczb
Pascal - Konsolowe

Program: gdzie użytkownik wprowadza określoną ilość liczb, a program odwraca ich kolejność.

Program tworzy tablicę N elementów podanych przez użytkownika, następnie przyjmuje wartości, po czym je odwraca – wypisując wartości tablicy począwszy od tej końcowej. Tablica dodatkowo posiada limit 100 elementów.

Kompilator: Turbo Pascal

Galeria:

Program w akcji.

Kod programu:

program tablica;
uses crt;
const maxroz=100;
var i,n:integer;
t:array[1..maxroz] of integer;
begin
     clrscr;
     writeln('Podaj liczbe elementow tablicy: ');
     readln(n);
     writeln('Podaj liczby');
     for i:=1 to n do
     readln(t[i]);
     writeln('Liczby w odwrotnej kolejnosci');
     for i:=n downto 1 do
     writeln(t[i]);
     readln;
end.