Parašė IGEN· 2011 Gru. 4 15:12:55
#26
O kaip išskaidyti skaičius pačioje pradžioje?
Iš char pereiti į integer?
Draugas rašė taip, kad reikia daryti funkciją, bet ar tai tiesa?
{Funkcija pakeičianti simbolius į skaičius}
function keitimas(a:char):integer;
begin
if a='0' then keitimas:=0;
if a='1' then keitimas:=1;
if a='2' then keitimas:=2;
if a='3' then keitimas:=3;
if a='4' then keitimas:=4;
if a='5' then keitimas:=5;
if a='6' then keitimas:=6;
if a='7' then keitimas:=7;
if a='8' then keitimas:=8;
if a='9' then keitimas:=9;
end;
Sunkiai su tom funcijom/procedurom sekasi, gal kas apie ją smulkiai gali paaiškinti?
Su keliais lengvais pavizdžiais?