Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
g-gurda
0 / 0 / 0
Регистрация: 15.04.2012
Сообщений: 9
1

Выполнить над числами указанное действие и вывести результат

28.04.2012, 11:24. Просмотров 1079. Ответов 2
Метки нет (Все метки)

помогите плииииз!!!!1
срочн надо!))))
1) Арифметические действия над числами пронумерованы следующим образом: 1 — сложение, 2 — вычитание, 3 — умножение, 4 — деление. Дан номер действия N (целое число в диапазоне 1–4) и вещественные числа A и B (В не равно 0). Выполнить над числами указанное действие и вывести результат. Использовать оператор case.
2) Даны числа a, b. Среди чисел от a до b найти все чётные числа.(Решить с помощью 'while', 'repeat', 'for').
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.04.2012, 11:24
Ответы с готовыми решениями:

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

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

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

По введенному номеру выполнить то или иное действие над числами
Даны 2 действительных положительных числа X и Y. Арифметические действия над числами пронумерованы...

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

2
klast
тыдыщ
204 / 187 / 166
Регистрация: 19.01.2011
Сообщений: 476
28.04.2012, 12:06 2
Лучший ответ Сообщение было отмечено g-gurda как решение

Решение

Цитата Сообщение от g-gurda Посмотреть сообщение
2) Даны числа a, b. Среди чисел от a до b найти все чётные числа.(Решить с помощью 'while', 'repeat', 'for').
Pascal
1
2
3
4
5
6
7
8
9
10
11
var
  a, b: integer;
 
begin
  read(a, b);
  while a <> b do
  begin
    if a mod 2 = 0 then write(a, ' ');
    inc(a);
  end;
end.
Добавлено через 35 секунд
Pascal
1
2
3
4
5
6
7
8
var
  a, b, i: integer;
 
begin
  read(a, b);
  for i := a to b do
    if i mod 2 = 0 then write(i, ' ');
end.
Добавлено через 16 минут
Pascal
1
2
3
4
5
6
7
8
9
10
var
  a, b: integer;
 
begin
  read(a, b);
  repeat
    if a mod 2 = 0 then write(a, ' ');
    inc(a);
  until a = b;
end.
Добавлено через 2 минуты
Цитата Сообщение от g-gurda Посмотреть сообщение
1) Арифметические действия над числами пронумерованы следующим образом: 1 — сложение, 2 — вычитание, 3 — умножение, 4 — деление. Дан номер действия N (целое число в диапазоне 1–4) и вещественные числа A и B (В не равно 0). Выполнить над числами указанное действие и вывести результат. Использовать оператор case.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
  n: integer;
  a, b: real;
 
begin
  write('n='); readln(n);
  write('a='); readln(a);
  write('b='); readln(b);
  case n of
    1: writeln(a + b);
    2: writeln(a - b);
    3: writeln(a * b);
    4: writeln(a / b);
  end;
end.
1
g-gurda
0 / 0 / 0
Регистрация: 15.04.2012
Сообщений: 9
29.04.2012, 14:12  [ТС] 3
Спасибо=) помог =)
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.04.2012, 14:12

Составить программу,которая по введенному номеру выполняет то или иное действие над числами.
Пожалуйста помогите!!! Даны два действительных положительных числа Х и У.Арифметические действия...

Составить программу, которая по введенному номеру выполняет то или иное действие над числами.
1)Ввести 2-мерный массив (8 строк, 12 столбцов) 6-значных чисел, выдать массив (и получить его в...

Выполнить над числами операцию соответствующую введенному номеру
Даны 2 произвольных не нулевых числа.Алгоритмические операции над числами пронумерованы...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru