Только для ! составить программу, которая позволяет ввести два числа в первой строке, и один из знаков (+, -, *, /) во второй строке. на экран должен быть выведен результат выполнения соответствующего арифметического действия. для ввода знака использовать переменную типа char.
101
247
Ответы на вопрос:
Var s: char; a, b: real; begin write('введите два числа '); readln(a, b); write('введите действие (+, -, *, /) - '); readln(s); case s of '+': writeln(a, ' + ', b, ' = ', a + b); '-': writeln(a, ' - ', b, ' = ', a - b); '*': writeln(a, ' * ', b, ' = ', a * b); '/': if (b=0) then writeln('на ноль делить нехорошо - бесконечность получится') else writeln(a, ' / ', b, ' = ', a / b); end; end.
Var ch : char; a,b : integer; begin readln(a,b); readln(ch); case ch of '+' : writeln(a+b); '-' : writeln(a-b); '*' : writeln(a*b); '/' : writeln(a/b); end; end.
Популярно: Информатика
-
BAMBELBI01314.05.2022 09:18
-
Ztduvuycc23.06.2020 04:54
-
Данил932316.03.2022 20:55
-
autosteklo77719.03.2020 15:18
-
dennikitos03.02.2021 23:57
-
Dimon2005Dima12.05.2020 07:37
-
Dima2202200513.03.2022 09:23
-
СнежанаВолк06.09.2022 15:30
-
Twister0407.05.2021 22:47
-
cfif2004226.03.2023 09:33