Prosim help nevim algoritmus a ak ho do nedele neodoslem tak
Prosim help nevim algoritmus a ak ho do nedele neodoslem tak
Ak algoritmus do nedele neodoslem tak pravdepodobne prenasam informatiku . Tu je zadanie -" Algoritmicky rieste obratenie poradia hodnot a1,... an."
- Prílohy
-
- VzorAlgoritmy.rar
- Vzor ako by to malo vypadat je to word dokument.
- (12.95 KiB) 96 stiahnutí
-
Sagittarius
Guru
- Príspevky: 2883
- Registrovaný: 13 feb 2007, 21:58
- Bydlisko: Do nekonečna a ešte ďalej
A v akom jazyku to potrebuješ? Ak v Pascale. Tak som to teraz spravil, ide to asi ak lepšie, ale nechce sa mi rozmýšľať. A to pole môže naplniť aj inak...A n sa má meniť alebo nie?
Kód: Vybrať všetko
program alg;
uses crt;
const n=100;
var i:integer;
a,b:array[1..n] of integer;
begin
clrscr;
writeln('PRED');
for i:=1 to n do
begin
a[i]:=i;
write(' ',a[i]);
end;
for i:=1 to n do b[i]:=a[n-i+1];
writeln('PO');
for i:=1 to n do
begin
a[i]:=b[i];
write(' ',a[i]);
end;
readln;
end.
-
Sagittarius
Guru
- Príspevky: 2883
- Registrovaný: 13 feb 2007, 21:58
- Bydlisko: Do nekonečna a ešte ďalej
-
Sagittarius
Guru
- Príspevky: 2883
- Registrovaný: 13 feb 2007, 21:58
- Bydlisko: Do nekonečna a ešte ďalej
-
audiotrack
VIP
- Príspevky: 25958
- Registrovaný: 09 sep 2005, 18:39
- Kontaktovať používateľa:
http://student.ef.zu.szm.sk/prace/1_3.pdfMiticko napísal:mne nejde o to aby ste mi to spravyli do tej formy aku mam odovzdat ja len neviem co je co v tom pascalovom formate
http://www.skola.pascal.szm.sk/Vyvojovy_diagram.pdf