Question

3. Ce va fi afişat pe ecran după următoarea instrucţiune:
Writeln(‘numărul este: ’,ord(A)+ord(B));
4. Scrieţi o secvenţă de program care calculează suma,diferenţa şi produsul a 2 numere introduse de la tastatură.

Answer 1

3.
Va afisa rezultatul 131 deoarece : A in codu ASCII e 65 iar B 66 [ 65+66 = 131 ]
4. 
Program Augustin;
var x,y,s:integer;
begin
Writeln('Dati doua numere');
readln(x,y);
s:=x+y;  Writeln('Suma=',s);
s:=x-y;   Writeln('Diferenta=',s);
s:=x*y;   Writeln('Produsul=',s);
readln;
end.