«<1 2 3 4 >»
Zakladateľ témy
Pascal pomoc Cituj
- nInJa

-
Počet príspevkov: 157
lidi potrebuju pomoc, sem lama vim to, pls pomcote stimto, potrebovla bych to do vecera --

1. Z klavesnice znaku nactete vetu zakoncenou teckou. V zadane vete nahradte vsechna mala pismena velkymi a vypiste na obrazovku po jednotlivych slovech od konce.

2. Zadejte jako text matem. operaci se dvema cisly. Zapis zpracujte ciselne a vysledek vypiste na obrazovku
Pr.: vstup: 2+3=
vystup: 2+3=5

3. Nactete z klavesnice retezec, vypiste kolik procent z retezce zabiraji mala pismena.

4. Z klavesnice nactete nekolik vet. Zjistěte pocet malych, velkych pismen, pocet slov, pocet vet a pocet cislic. Vysledky vypiste na obrazovku.

5. Spočítejte v textu počet malých písmen, matem. operátorů a samohlásek.

6. Provedte v zadanem retezci zamenu velkych pismen za mala a soucasne mala za velka. Vysledny retezec vypiste.

7. Po zadani nekolika vet zajistete, aby na zacatku vet byla vzdy velka pismena.
Pr.: vstup:...hodin?je deset...
vystup: ...hodin? Je deset...
Pridané: 11.03.2009 17:10:55
Autor
RE: Pascal pomoc Cituj
-- Angelo

-
Počet príspevkov: 277
To musí byť Pascal hej? -
Pridané: 11.03.2009 17:12:54
Zakladateľ témy
RE: Pascal pomoc Cituj
- nInJa

-
Počet príspevkov: 157
bohuzel ano
Pridané: 11.03.2009 17:14:19
Zakladateľ témy
RE: Pascal pomoc Cituj
- nInJa

-
Počet príspevkov: 157
mozno ze kdyby bylo neco podobneho pascalu zebych to nak predelal
Pridané: 11.03.2009 17:15:01
Zakladateľ témy
RE: Pascal pomoc Cituj
- nInJa

-
Počet príspevkov: 157
aspon to jak jak udelam 'a vypiste na obrazovku po jednotlivych slovech od konce.' pls -
Pridané: 11.03.2009 17:54:19
Autor
RE: Pascal pomoc Cituj
- Endy

-
Počet príspevkov: 190
vies ze aj ja maturujem s tochto programu ale zatial ho nejak nvm pochopit cize neporadim -
Pridané: 13.03.2009 16:23:32
Zakladateľ témy
RE: Pascal pomoc Cituj
- nInJa

-
Počet príspevkov: 157
uz vim jak na tu jednicku ^_- ale kdyz to dam vypsat tak se mi misto slova do p[1] napise celej string a to fakt nechapu kdyz mam nastavene aby se po mezere nahravalo dalsi slovo do p[2];
Pridané: 13.03.2009 16:31:14
Autor
RE: Pascal pomoc Cituj
---Gold rEs0LuTe

-
Počet príspevkov: 281
s php by som ti vedel pomoct, ale v pascale nie -
akurat ten 2. myslim ze by som v pascale vedel -


program lol;
uses crt;
var a,b;
begin
clrscr;

read(a);
write(' + ');
read(b);
write(' = ');
clrscr;
write(a,' + ',b,' = ',(a+b));
readkey;
end.


myslim, ze tak nejak, niesom si isty, nemam tu pascal na odskusanie takze neviem.
Pridané: 13.03.2009 17:17:15
Zakladateľ témy
RE: Pascal pomoc Cituj
- nInJa

-
Počet príspevkov: 157
reso, dobré, akorat toto neni presne co po me chteji -, je to ze zadas cely text do string, a znej musim vybrat ty cisla, prevedes je pomoci valu (asi) do integeru a udelas soucet. A kdyz ted to pisu asi vim uz jak - du to zkusit -

Pridané: 13.03.2009 18:02:20
Zakladateľ témy
RE: Pascal pomoc Cituj
- nInJa

-
Počet príspevkov: 157
paráda --
program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;

var
s:string;
i,code,index:integer;
a:array [1..3] of integer;

begin
index:=0;
writeln('Zadej matematickou operaci (x+y=)');readln(s);
for i:=1 to length(s) do begin
case s[i] of
'0'..'9' : index:=index+1;
end;
case s[i] of
'0'..'9' : val(s[i],a[index],code);
end;
end;
write(a[1],'+',a[2],'=');writeln(a[1]+a[2]); readln;


end.


ted vymyslet ty další -
Pridané: 13.03.2009 18:20:42
«<1 2 3 4 >»
ShoutBox
05.12.2017 23:31:27
16.12. sraz v praze? kdo prijde? -
18.11.2017 23:06:08
Všetci starnú, všetkých začína baviť niečo nové, kz časy boli parádne, som rád že som tu mohol spoznať kopu ľudí z cz/sk, dúfam že sa vám každému darí v živote aj dariť bude, buďte optimista na každom kroku chaloši -
18.10.2017 12:03:19
posílám jeden umírající release
01.10.2017 14:40:04
Ahojte -
30.09.2017 16:28:11
Klox0^ .. čas na comeback -
26.08.2017 20:44:10
csgo surf -
All rights reserved 2007-2017 © by KZSK.sk # Coded by Jakub "rEs0LuTe" Sedláček. Designed by Oldřich "jab" Selner.