va roog ajutor inlocuiti instructiunea case a programului p 54 cu o secventa echivalenta de instructiuni if
Program P 54;
var a,b: real;
c:char;
begin
write('a='); readln(a);
write ('b=');readln (b);
write('Cod operatie'); readln(c);
case c of
'+': writeln ('a+b', a+b);
'-':writeln ('a-b', a-b);
'*'writeln ('a*b', a*b);
'/' writeln('a/b', a/b);
else writeln ('Cod operatie necunoscut');
end;
readln;
end.
in loc de case poti utiliza aceasta structura if(daca)
If c='+' then write (a+b) else if c='-' then write (a-b) else if c='*' then write(a*b) else if c='/' then write(a/b) else write('Cod operational necunoscut');
Vă mulțumim că ați accesat site-ul nostru dedicat Informatică. Sperăm că informațiile furnizate v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Vă așteptăm cu drag să reveniți și nu uitați să ne salvați la favorite!
