Question

PASCAL

Cyfry danej liczby
Na wejściu podajemy liczbę n-cyfrową, n <= 6 (wcześniej trzeba podać n, dla uproszczenia jednak można zrobić to zadanie przyjmując sobie np. n=4). Napisz program, który umieści w tablicy kolejne cyfry tej liczby.

Rozwiązanie załącz w postaci kodu źródłowego programu.

Answer 1

program zadanie;

var

liczba : array [0..6] of char;

n : string[6];

begin

write('Podaj liczbe: ');

readln(n);

liczba:=n;

end.