Informatică, întrebare adresată de Kokokq, 8 ani în urmă

Rezolvati va rog acest program

Anexe:

Kokokq: in Pascal
ffddfgfg: nush Pascal

Răspunsuri la întrebare

Răspuns de grigore2018
1

Răspuns:

program Calculator;

var

 a, b: integer;

 operation: char;

begin

 readln(a, b);

 readln(operation);

 case operation of

   '+': writeln(a + b);

   '-': writeln(a - b);

   '*': writeln(a * b);

   '/': writeln(a div b);

 else

   writeln('Invalid operation');

 end;

end.

Alte întrebări interesante