Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/15: Рейтинг темы: голосов - 15, средняя оценка - 4.60
9 / 2 / 0
Регистрация: 16.12.2011
Сообщений: 106
1

Вычислить произведение чисел, не используя операцию умножения

16.12.2011, 20:36. Просмотров 3081. Ответов 3
Метки нет (Все метки)

1.Дано натуральные числа m и n.Вычислите их произведение не используя операцию умножения.
2.Дано натуральное число.Определить,равна ли первая цифра числа его последующей цифре.
3.Состав те программу,определяющую является ли число A делителем числа B.
4.Напишите программу,которая по введенному числу от 1 до 12(номеру месяца)выдает все происходящие на этот месяц праздничные дни.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.12.2011, 20:36
Ответы с готовыми решениями:

Вычислить z=x^k, используя операцию умножения
Сделать программу с циклом с параметром. Вычислить z=x^k, используя операцию умножения, т. е....

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

Вычислить степень числа не используя операцию умножения
Задача: вычислить a в степени n(оба целые, задаются в ходе программы) не используя операцию...

Написать функцию умножения двух чисел, используя только операцию сложения
Ребят помогите плз. Нужно 2 програмки. Написать функцию умножения двух чисел, используя только...

3
Мега Таракан
110 / 11 / 5
Регистрация: 24.05.2010
Сообщений: 227
16.12.2011, 20:41 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от Proskurina Посмотреть сообщение
Дано натуральные числа m и n.Вычислите их произведение не используя операцию умножения.
Здесь число a складываем b раз
Pascal
1
2
3
4
5
6
7
8
9
Var 
  a, b, i, Res : Integer;
Begin
  Res := 0;
  ReadLn(a, b);
  For i := 1 To b Do
    Res := Res + a;
  WriteLn('a * b = ', Res);
End.
Добавлено через 1 минуту
Цитата Сообщение от Proskurina Посмотреть сообщение
Состав те программу,определяющую является ли число A делителем числа B.
Pascal
1
2
3
4
5
6
Var 
  a, b : Integer;
Begin
  ReadLn(a, b);
  WriteLn(b Mod a = 0);//выведет TRUE если число А является делителем числа В, иначе выведет FALSE
End.
0
trainspotting
1084 / 484 / 384
Регистрация: 11.11.2010
Сообщений: 773
16.12.2011, 20:52 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

2.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  a:longint;
begin
  repeat
    write('a=');
    readln(a);
  until a>9;
  while a<>0 do
    begin
      if (a<100) and (a>9)then
        write(a mod 10=a div 10);
      a:=a div 10;
    end;
end.
0
Почетный модератор
7951 / 3922 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
16.12.2011, 21:39 4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от Proskurina Посмотреть сообщение
4.Напишите программу,которая по введенному числу от 1 до 12(номеру месяца)выдает все происходящие на этот месяц праздничные дни.
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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
uses crt;
var n: integer;
begin
write('Введите номер месяца: ');
readln(n);
case n of
1:
begin
writeln(' 1 января - Новый год');
writeln(' 7 января - Рождество Христово');
writeln('19 января - Крещение Господне');
end;
2:
begin
writeln(' 8 февраля - День Российской науки');
writeln('20 февраля - Международный день родного языка');
writeln('23 февраля - День защитника Отечества');
writeln('28 февраля - Масленица');
end;
3:
begin
writeln(' 1 марта - Праздник прихода весны');
writeln(' 8 марта - Международный женский день');
end;
4:
begin
writeln(' 1 арпеля - Международный день птиц');
writeln(' 7 апреля - День рождения Рунета');
writeln('12 апреля - Католическая Пасха');
writeln('23 апреля - Пасха');
end;
5:
begin
writeln(' 1 мая - День труда');
writeln(' 9 мая - День Победы');
writeln('10 мая - День матери');
writeln('15 мая - Международный день семьи');
end;
6:
begin
writeln(' 5 июня - Всемирный день охраны окружающей среды');
writeln(' 6 июня - Троица');
writeln('24 июня - Купала');
writeln('25 июня - День единения славян');
end;
7:
begin
writeln(' 6 июля - Всемирный день поцелуя');
writeln(' 8 июля - Всероссийский день семьи, любви и верности');
writeln('10 июля - День рыбака');
writeln('11 июля - Всемирный день шоколада');
end;
8:
begin
writeln('12 августа - День Военно-воздушных сил (День ВВС)');
writeln('22 августа - День Государственного флага Российской Федерации');
end;
9:
begin
writeln(' 1 сентября - День знаний');
writeln('21 сентября - Международный день мира');
writeln('30 сентября - День Интернета в России');
end;
10:
begin
writeln(' 1 октября - Международный день улыбки');
writeln(' 5 октября - Всемирный день учителя');
writeln('31 октября - Хэллоуин - канун Дня всех святых');
end;
11:
begin
writeln(' 1 ноября - День всех святых');
writeln(' 8 ноября - Международный день КВН');
writeln('17 ноября - Международный день студентов');
writeln('27 ноября - День матери России');
end;
12:
begin
writeln(' 6 декабря - День сетевика');
writeln('10 декабря - День прав человека');
writeln('23 декабря - Католический сочельник');
writeln('25 декабря - Католическое Рождество');
end;
else writeln('Нет такого месяца!');
end;
readkey
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.12.2011, 21:39

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Вычислить произведение ху используя лишь операцию сложения
даны натуральные числа x и y. вычислить произведение ху используя лишь операцию сложение. решить...

Найдите произведение двух чисел, используя только операцию сложения
Введите два числа (например A=5 и В=8  5 раз суммируем 8+8+8+8+8) и найдите их произведение,...

1. Вычислить сумму чисел от 2 до 2 в десятой степени не используя операцию возведения в степень
Вычислить сумму чисел от 2 до 2 в десятой степени не используя операцию возведения в степень.

Вычислить произведение 2-х n и m чисел без использования операции умножения
Подсказка:использовать цикл суммирования n раз числа m. Помогите,пожалуйста!


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

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

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