Pascal language

[Costi]

1) Se da un fisier citire.txt. Se vor citi 5 caractere din fisier. Daca acestea sunt litere mici sa se transforme in litere mari.
2) Se citesc n caractere de la tastatura. Sa se afiseze numai vocalele.

Ma poate ajuta cineva cu aceste doua cerinte? O idee cum sa incep.

[Nirvana]

costica te ajut eu )here Nirvanel..eu iti fac un program dar tu modifica sa fie pascal eu stiu C++
Revin cu edit cu programul, si inca ceva eu til dau cu o variabila..il modifici tu sa fie cu citire.txt..
1.poate am gresit dar macar prinzi algoritmul
#include <iostream.h>
#include <string.h>
int main ()
{
char s[101]; int i,n;
cout<<"sirul="; cin.get (s.101);
n=strlen (s);
for (i=0;i<n;i++)
if (s[i]>='a' && s[i]<='z') cout<<toupper(s[i])<' ';
return 0;
}
2. si pentru 2
#include <iostream.h>
#include <string.h>
int main ()
{
char s[101]; int i,n;
// s=sir, i variabila din for, n= lungimea lui S
cout<<"sirul="; cin.get (s.101);
n=strlen (s); //lungimea
for (i=0;i<n;i++)
strlw (s); // am convertit tot sirul s in litere mici!
if (s[i]='a' || s[i]='e' || s[i]='i' || s[i]='o' || s[i]='u') cout<<s[i]<' ';
return 0;
}


acum ma scuzi ..eu stiu doar C++ dar nu cred ca e mare diferenta ! intre pascal si c++ ..mai schimba cate ceva..in rest..e cam aceeasi treaba...
daca team ajutat zimi:))si te rog scuzama daca am vreo greseala de sintaxa..

[nr913]

Da, ai erori de sintaxã logicã, cum ar fi la comparare. Nu compari egalitate cu '=', ci cu '=='. Acum nu știu cum e în Pascal, dar în C++ o sã-ți dea mereu true.

Attitude - A little thing that makes a BIG difference

[Nirvana]

da scuze am uitat de == era seara si eram obosit..

[Costi]

Multumesc de ajutor nirvana.. dar nu este bun, am nevoie de pascal

[thenewbye911]

Codu lui nirvana e de *****.

'text' nu e aceeasi chestie ca "text" in C++, in PHP da

[nr913]

A pus cum trebuie apostrofii și ghilimelele, în schimb tu te-ai fãcut de *****.

Attitude - A little thing that makes a BIG difference

[Costi]

Va multumesc pentru ajutor, am rezolvat puteti inchide topicul