| Autor | Správa |
|---|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| Program pocitac;
type Tpocitac=record
Znacka : string;
Farba : (biela,cierna,strieborna);
Uhlopriecka : integer;
Pamat : real;
Hmotnost : real;
end;
var
pc : Tpocitac;
S : Char;
I : Integer;
LINE: string;
f: text;
begin
Assign(f, 'pocitac.txt');
Rewrite(f);
writeln('Zadaj nasledujuce p... |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | a kde mám dať ten repeat ? |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | Kde má tam byť do bo už dajako nechápem strácam sa niečo iné čítam ale tu verím viac bo sa v tom určite vyznáš |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| program zadanie2;
type
Tkamiony=record
znacka :string;
TK:(ano,nie);
zatazenost:(volny,naceste);
end;
var
dp:Tkamiony;
f:text;
A,V,N:char;
begin
write ('TK');
write ('A-ano,N-nie:');
readln(A);
until (A='a') or (A='A') or (A='n') or (A='N');
Case A of
'a','A':dp.TK:=ano;
'n','N':dp.TK:=nie;
en... |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| to ani ja celý pascal na výške prejdu behom mesiaca a ja si pískať môžem lebo v živote som to nemala  |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | a keď chcem aby z toho bol záznam tak na žačiatok pridam type a ktomu čo potrebujem ? |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | ta to robila spolužiačka že jej tu podmienku nebere a ja jej s tým neviem pomôcť že prečo -_- |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| Program mesiac;
Type
Tmesica=record
Cislomesiaca:string;
x:integer;
end;
var
cislomesiac:Tmesiac;
begin
writeln('zadaj cislo mesiaca');
write('cislo mesiaca');
if 1..12 then write
1:write('Mesiac januar je zimny mesiac');
2:write('Mesiac februar je zimny mesiac');
3:write('Mesiac marec je jarny me... |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| Veľmi pekne ďakujem  |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| A ako to môžem urobiť aby načítavalo ostatne ?
// Spojený príspevok 10.12.2016 13:52
A chcem sa aj opýtať či sa da urobiť porovnanie napríklad ako tu mam ten príklad dvoch počítačov
// Spojený príspevok 10.12.2016 13:53
ale porovnanie v tom zmysle aby vyhodnotilo ktorý je lepší |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| Vypíše mi len značku tento kráta po skúške programu a dva až viac kráť farbu ...
// Spojený príspevok 10.12.2016 13:48
Ale už mi to zapísalo aj do textového súboru ale len značku a farbu .. |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | No skúšala som to ale nefunguje to :/ |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| Program pocitac;
type Tpocitac=record
Znacka : string;
Farba : (biela,cierna,strieborna);
Uhlopriecka : integer;
Pamat : real;
Hmotnost : real;
end;
var
pc : Tpocitac;
S : Char;
I : Integer;
LINE: string;
f: file of Tpocitac;
begin
Assign (f'pocitac.txt');
Rewrite(f);
writeln('Zadaj nasledujuce pol... |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| Kde konkrétne to mám zapísať podla iných vzorov keď to tam zapíšem nefunguje to a chcem sa opýtať nechcem aby mi po sebe vypisovalo farby ale chcem aby jednu farbu vypísalo
// Spojený príspevok 09.12.2016 17:41
Keď si otvorím textový súbor ktorý mi vytvori nenachádza sa v ňom nič ... |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| už som si našla chybu
// Spojený príspevok 09.12.2016 16:44
A ked chcem aby sa opkoval program žeby sa vypísali napríklad 5 druhov počítačov ako to tam môžem zadať ? |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | Ako ? |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | ďakujem ..... napísala som program no neberie mi ho vyhadzuje mi chyby pri značke hmotnosti |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | ako vytvorím teraz z tohto textový súbor ? |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | netušim ako sa s tym poriadne pracuje ked že to mam len druhy mesiac v živote a netušim . Mám proste teraz spracovať zadanie záznam čo ma obsahovať podmienku a tu podmienku until som robila všetko podla vzoru mame niečo podobne spracovane len tam nebol problem |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| Program pocitac;
type Tpocitac=recoord
Znacka:string;
Farba: (biela,cierna,strieborna);
Uhlopriecka:integer;
Pamat:real;
Hmotnosť:real;
end;
var
Pocitac:Tpocitac;
begin
writeln ('Zadaj nasledujuce polozky:');
write('Znacka:')
readln(pocitac.znacka);
write('Farba:')
readln(pocitac.farba);
repeat
wri... |
|
Fórum: Ostatné Téma: Pascal |
Odpovede: 40
Zobrazenia: 1751
| | Potrebovala by som pomôcť v pascali. Chcela som vytvoriť záznam ktorý by obsahoval niečo kolo počítačov ja som si vybrala značku, farbu, uhlopriečku, pamäť a hmotnosť no keď program som zrealizovala nefungoval v každom riadku vyhodil chybu. Záznam musí obsahovať podmienku . No problém nastáva hlavne... |
|