Meniu Referate
Romana
Romana1
Romana2
Istorie
Istorie1
Geografie
Geografie1
Diverse
Drept
Economie
Filozofie
Fizica
Informatica
Biologie
Chimie
Italiana
Spaniola
Germana
Franceza
Engleza
Marketing
Matematica
Medicina
Psihologie
Astronomie
Stiinte Politice
Proiecte

Conversii de la siruri la valori numerice si invers

...ia valorilor reale catre siruri de caractere.Program conv2 Var a string xrealbeginx-67.789strx 10 2, aritelnaend.Acum studiem conversia inversa de la tipul string catre valori numericeintregi sau reale.Observatie daca incercam sa convertim sirul 1a2 catre o valoare de tip integer ,conversia nu reuseste, pentru ca sirul contine caracterul a .Pentru realizarea conversiei utilizam procedura val .Ea are 3 parametri si anume Procedure valsstring var variabilasnumerica var codserintegervariabilasnumerica variabila de tip intreg sau real care va retine rezultatul conversieicodser variabila de tip intreg .Dupa conversie ,aceasta va retine 0,daca conversia a reusit sau o valoare diferita de 0,in caz contrar.Program conv3Var astring X,erintegerBeginrite irul este readlnaVala, x, erIf er0 then riteln conversia a reusit ,xElseBeginriteln conversia nu a reusit ritelnxEndEnd.Observatii Daca sirul de caractere cifre este precedat de un de blank-uri, conversia nu reuseste.Exemplu sirul 123 nu poate fi convertit catre o valoare numerica. Daca sirul contine un singur caracter litera, el nu poate fi convertit catre o valoare numerica. De exemplu, sirul 12i nu poate fi convertit . Exceptie fac sirurile de caractere care respecta Daca variabila care retine rezultatul este de tip intreg ,iar sirul contine punctul zecimal,conversia nu reuseste.De exemplu , sirul 1.23 nu poate fi convertit catre o variabila de tip intreg, dar poate fi convertit catre o variabila de tip real. Daca in urma conversiei se obtine o valoare numerica care nu poate fi memorata de variabila respectiva,programul se termina anormal,prin eroare de executare.Programul urmator testeaza daca o valoare introdusa este numerica si daca este cuprinsa in intervalul i10,20s.Program conversieVar sir stringEroare int egervaloarerealBeginriteln introduceti sirul readlnsirValsir,valoare,eroareIf eroare 0thenriteln valoarea introdusa este eronata Else If valoare10 or valoare20 thenriteln valoarea nu este in intervalul dorit Elseriteln ok End.jVH6F0vpriCJj5j5a5CJ8jPVIBtx4VzprHXnviiiiiiiii
iiiiiiiiiiiirarF11FI.,U. A!ia8i8NormalCJsHaJmHsHtHAiDefault Paragraph FontBaBody TextaJ5...
Download