Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailem Pascal, integer to string

Zdravím,

prosimvás, jde nějak přiřadit proměnné typu string číselnou hodnotu typu integer?

napr.
var a,d: string;
b, c: integer
begin
read (a);
read (b);
a[0]:= a+b;
a[1]:= a-b;
d:= a[0] + a[1];
writeln (d);
end.

Takto to fungovat nebude (string:=integer).
Děkuji.

Jsou zobrazeny jen nové odpovědi. Zobrazit všechny
Předmět Autor Datum
Spíš řekni čeho chceš dosáhnout, to se bude radit líp. Mimochodem ti to nebude fungovat asi vůbec, p…
JoDiK 21.09.2011 16:23
JoDiK
Program Prevodz; Program. který bude převádět celá, kladná čísla z desítkové soustavy na dvojkovou…
ATI16 21.09.2011 16:25
ATI16
Aha, tak to na to jdeš celkem složitě - u dvojkové soustavy jsou jen nuly a jedničky, tak neřeš přev…
JoDiK 21.09.2011 16:28
JoDiK
Nenapadá mně jak to provést.
ATI16 21.09.2011 16:29
ATI16
Přece takto (nezapomeň, že to vlastně zjišťuješ od konce): if cele mod 2 =1 then vysledek:='1'+vysle…
JoDiK 21.09.2011 16:32
JoDiK
Děkuju. poslední
ATI16 21.09.2011 16:36
ATI16
Obecně pro převod mezi string a integer jsou konverzní funkce VAL a STR (najdi si v nápovědě)...
JoDiK 21.09.2011 16:26
JoDiK
Mohl by si mi to připsat do toho programu prosimtě?
ATI16 21.09.2011 16:28
ATI16
viz o pár řádků výš... nový
JoDiK 21.09.2011 16:35
JoDiK

Program Prevodz;

Program. který bude převádět celá, kladná čísla z desítkové soustavy na dvojkovou soustavu.
Tohle jsem zatím napsal, ale zasekl jsem se na těch datových typech.

var i, a, cele: integer;
vysledek: string;

begin
writeln('Zadej celé kladné číslo v desítkové soustavě,' );
writeln('které bude převedeno do dvojkové soustavy');
readln (cele);

i:=0;
vysledek:='';

while (cele <> 0) do
begin
vysledek[i]:= (cele mod 2);
cele:= cele div 2;
i:=i+1;
vysledek:= vysledek + vysledek[i];
end;
writeln (vysledek);
readln();
end.

Zpět do poradny Odpovědět na původní otázku Nahoru