Ввести с клавиатуры знак арифметической операции (либо+ либо - либо * либо /(деление)и .два числа. вывести на экран результат. при вводе знака операции # выход из программы.6

270

404

Посмотреть ответы 2

Ответы на вопрос:

flywitch

Информатика

4,7(50 оценок)

uses crt;

var a,b,s: real; z: char; beginwrite('vvedite a = '); readln(a); write(' + - / * : ' ); readln(z); write('vvedite b = '); readln(b); case z of'+': begin s: =a+b; writeln(a,' + ',b,' = ',s); end; '-': begin s: =a-b; writeln(a,' - ',b,' = ',s); end; '*': begin s: =a*b; writeln(a,' * ',b,' = ',s); end; '/': begin s: =a/b; writeln(a,' / ',b,' = ',s); end; elsewriteln('error: incorrect operation ! '); end; readln; end.