Форум программистов, компьютерный форум CyberForum.ru

произведение 4-х чисел - C++

Восстановить пароль Регистрация
 
bizoga
 Аватар для bizoga
7 / 7 / 0
Регистрация: 11.01.2013
Сообщений: 101
12.03.2013, 19:19     произведение 4-х чисел #1
1. произведение 4-х чисел
2. произведение 6-и чисел
3. объем конуса

ету программу которая написана на паскале написать на С++

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
uses crt;
label m;
var n:char;
    a,b,c,d,e,f,h:integer;
 Function d_ok(n:byte):real;
 var d,a:real; i:byte;
Begin
       d:=1;
       for i:=1 to n do
         begin
             writeln('enter');
              readln(a);
             d:=d*a;
          end;
    d_ok:=d;
end;
  procedure  ok;
    var a,b,h:real;
begin
     write('enter a=');
       readln(a);
        write('enter b=');
          readln(b);
             write(' enter h=');
               readln(h);
                writeln('v=',a*sqr(b)*h:4:2);
     readln
    end;
 Begin
   m:  clrscr;
      textcolor(green);
       writeln(' 1 - Dobytok 4 chisel');
         writeln(' 2 - Dobytok 6 chisel');
           writeln(' 3 - Obyem Konysa');
             writeln(' 4 - Exit');
               write('enter n = ');
                 readln(n);
          Clrscr;
 textcolor(red);
  case n of
 '1':writeln('Dobytok 4 chisel : ','Rozvyazok = ',d_ok(4):4:2);
 '2':writeln('Dobytok 6 chisel : ','Rozvyazok = ',d_ok(6):4:2);
 '3':begin writeln('Obyem Konysa : ');ok;  goto m; end;
 '4':exit;
 end;
    readln;
End.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.03.2013, 19:19     произведение 4-х чисел
Посмотрите здесь:

В последовательности вещественных чисел подсчитать произведение чисел, кратных 3 C++
Дана последовательность целых положительных чисел. Найти произведение только тех чисел, которые больше заданного числа М C++
Запишите функцию для вычисления произведения целых чисел из диапазона от а до в. найдите произведение чисел, диапазон ввести с клавиатуры. В С++ C++
Пофиксите баг? Найти произведение чисел последовательности, не делящихся на 5, наибольшее из таких чисел, и его номер C++
Матрица.В матрице A(6; 6) найти произведение суммы четных чисел в 3-ей строке и суммы отрицательных чисел 1-го столбца C++
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
MarVaL
С++ Beginner
 Аватар для MarVaL
116 / 116 / 16
Регистрация: 28.02.2013
Сообщений: 246
12.03.2013, 19:47     произведение 4-х чисел #2
C++
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
#include <iostream>
using namespace std;
 
void multOf4()
{
    int x1, x2, x3, x4;
    cout << "Enter x1: ";
    cin >> x1;
    cout << "Enter x2: ";
    cin >> x2;
    cout << "Enter x3: ";
    cin >> x3;
    cout << "Enter x4: ";
    cin >> x4;
    
    cout << "Multiplication of x1, x2, x3, x4: " << (x1 * x2 * x3 * x4) << endl;
}
 
void multOf6()
{
    int y1, y2, y3, y4, y5, y6;
    
    cout << "Enter y1: ";
    cin >> y1;
    cout << "Enter y2: ";
    cin >> y2;
    cout << "Enter y3: ";
    cin >> y3;
    cout << "Enter y4: ";
    cin >> y4;
    cout << "Enter y5: ";
    cin >> y5;
    cout << "Enter y6: ";
    cin >> y6;
    
    cout << "Multiplication of y1, y2, y3, y4, y5, y6: " << (y1 * y2 * y3 * y4 * y5 * y6) << endl;
 
}
 
 
void getVolume()
{
    float R, H;
    cout << "Enter Radius: ";
    cin >> R;
    cout << "Enter Height: ";
    cin >> H;
    cout << "Volume: " << (1. / 3 * 3.14 * R * R * H );
}
 
int main()
{
    multOf4();
    multOf6();
    getVolume();
    return 0;
}
Humble_Beck
15 / 15 / 1
Регистрация: 10.03.2013
Сообщений: 54
12.03.2013, 19:48     произведение 4-х чисел #3
C++
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
// CyberForum.cpp : Defines the entry point for the console application.
//
 
#include "stdafx.h"
#include <iostream>
#include <math.h>
using namespace std;
 
int d_ok(int n){
    int d=1;
    int a=0;
    for(int i=0; i<n; i++){
        cout<<"enter"<<"\n";
        cin>>a;
        d*=a;
    }
    return d;
}
void ok(){
    int a,b,h;
    cout<<"enter a="<<"\n";
    cin>>a;
    cout<<"enter b="<<"\n";
    cin>>b;
    cout<<"enter h="<<"\n";
    cin>>h;
    cout<<"v="<<a*sqrt(b)*h<<"\n";
    
}
int _tmain(int argc, _TCHAR* argv[])
{
    int n;
    cout<<"1 - Dobytok 4 chisel"<<"\n";
    cout<<"2 - Dobytok 6 chisel"<<"\n";
    cout<<"3 - Obyem Konysa"<<"\n";
    cout<<" 4 - Exit"<<"\n";
    cout<<"enter n = "<<"\n";
    cin>>n;
    switch(n){
    case 1:
        cout<<"Dobytok 4 chisel = "<<"\n";
        cout<<d_ok(4);
        break;
    case 2:
        cout<<"Dobytok 6 chisel = "<<"\n";
        cout<<d_ok(6);
        break;
    case 3:
        cout<<"Obyem Konysa : "<<"\n";
        ok();
        break;
    case 4:
        exit(0);
        break;
    }
    _gettchar();
    return 0;
}
bizoga
 Аватар для bizoga
7 / 7 / 0
Регистрация: 11.01.2013
Сообщений: 101
13.03.2013, 10:37  [ТС]     произведение 4-х чисел #4
Цитата Сообщение от MarVaL Посмотреть сообщение
Спасибо, вы мне очень помогли, а то на паскале написать-написал, а вот на С++ не смог правильно переписать

Добавлено через 1 минуту
Спасибо, мне есть чему поучится -)
Yandex
Объявления
13.03.2013, 10:37     произведение 4-х чисел
Ответ Создать тему
Опции темы

Текущее время: 00:34. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru