Czy ktoś mógłby mi wytłumaczyć bądź napisać takowy program w pascalu: tabela 10kolumn 1wiersz, ja podaje liczby które mają wejść do tabeli...
thx za pomoc z góry
Czy ktoś mógłby mi wytłumaczyć bądź napisać takowy program w pascalu: tabela 10kolumn 1wiersz, ja podaje liczby które mają wejść do tabeli...
thx za pomoc z góry
???
no chodzi mi żeby wyglądało to tak:
1 1 1 1 1 1 1 1....
żeby to było 10liczb tak jakby w tabeli i że ja podaje te liczby
drink320 napisał(a)
no chodzi mi żeby wyglądało to tak:
1 1 1 1 1 1 1 1....żeby to było 10liczb tak jakby w tabeli i że ja podaje te liczby
Albo ja już za stary jestem albo za tępy żeby zrozumieć o Ci chodzi.
maciejmt napisał(a)
Widać że sie z niego nabijacie, ale problem jest prosty...
var
tab : array[1..10] of integer;
I,Liczba : Integer;
begin
for I:=1 to 10 do
begin
readln(Liczba);
tab[i] := Liczba;
end;
end.
Mam nadzieje ze pomoglem :d
kolega pomógł tylko że program pisze z góry do dołu czyli tak:
1
2
3
4
5
6
...
10
a to ma być niby tak: 1 2 3 4 5 6 7 8 9 10 może bez spacji.
A co do pana co nierozumie to może dlatego że ja z pascala kompletna noga bo mieliśmy nauczyciela co niezabardzo potrafił uczyć xD
Nie bawiłem się nigdy w takie zabawy w konsolówce Pascala, ale zawsze możesz wczytać ciąg jako string, i potem wzgledem jakiegoś separatora porozdzielać i wrzucić do tablicy.
Jak każdą liczbę zatwierdzasz enterem to nic dziwnego, że przechodzi Ci do następnego wiersza. Wpisz sobie ciurkiem, oddzielając spacją każdą liczbę, i zatwierdź dopiero po ostatniej.
Jeśli takie rozwiązanie Ci nie pasuje to: WhereX, WhereY, GotoXY i help. Rozwiązanie proste ale dużo na około przejdziesz.
var
tab : array[1..10] of integer;
I,Liczba : Integer;
begin
for I:=1 to 10 do
begin
read(Liczba);
tab[i] := Liczba;
end;
readln;
end.
Najlepsze jest to że wszędzie tego Integer używacie... to już lepiej Int64 jak wam mało zakresu [glowa]
A skąd wiadomo jaką liczbę użyszkodnik wprowadzi?
PS. Na integer są najszybsze operacje