Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.53/15: Рейтинг темы: голосов - 15, средняя оценка - 4.53
0 / 0 / 0
Регистрация: 22.05.2019
Сообщений: 8
1

Арифметические действия над числами пронумерованы следующим образом: 1- сложение ,2- вычитание, 3- умножение, 4- деление

18.06.2019, 15:51. Показов 3004. Ответов 1
Метки нет (Все метки)

Арифметические действия над числами пронумерованы следующим образом: 1- сложение ,
2- вычитание, 3- умножение, 4- деление. Дан номер действия и два числа А и В (В не равно нулю). Выполнить над числами указанное действие и вывести результат.

Реализовать задачу через подпрограмму.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.06.2019, 15:51
Ответы с готовыми решениями:

Разработать модуль, реализующий основные математические операции (сложение, вычитание, умножение, деление) над двумя числами
привет. очень нужна помощь с задачкой: Разработать модуль, реализующий основные математические...

Сложение, вычитание, умножение и деление комплексных чисел
Помогите пожалуйста составить требуемые подпрограммы работы с комплексными числами(сложение,...

Арифметические действия над числами
Помогите пожалуйтса решить задачу,я всю ночь сидел парился над задачой и ничего не...

Оператор case: арифметические действия над числами
Арифметичні дії над числами пронумеровані в такий спосіб: 1 - додавання, 2 -віднімання, 3 -...

1
Почетный модератор
64084 / 47493 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
18.06.2019, 16:16 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
function rezult(a,b:real;op:integer):real;
begin
case op of
1:rezult:=a+b;
2:rezult:=a-b;
3:rezult:=a*b;
4:rezult:=a/b;
end;
end;
var a,b:real;
    n:integer;
begin
write('a=');
readln(a);
repeat
write('b<>0 b=');
readln(b);
until b<>0;
repeat
writeln('Введите действие');
writeln('1-сложение');
writeln('2-вычитание');
writeln('3-умножение');
writeln('4-деление');
readln(n);
until n in [1..4];
write('Результат=',rezult(a,b,n):0:2)
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.06.2019, 16:16

Элементы равностороннего треугольника пронумерованы следующим образом:...
Кто решит тот получит плюс стоПиццОт в рейтинг )) Не ну решите плиз всю задачу бесплатно!))) ...

Элементы равностороннего треугольника пронумерованы следующим образом. . .
Элементы равностороннего треугольника пронумерованы следующим образом: 1 — сторона (a), 2 — радиус...

элементы равнобедренного прямоугольного треугольника пронумерованы следующим образом...
элементы равнобедренного прямоугольного треугольника пронумерованы следующим образом:...

Вычитание, умножение и деление для чисел в 4 сс
Пишу калькулятор для четверичной системы счисления. У меня вещественные числа и со сложением...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru