Форум программистов, компьютерный форум, киберфорум
Наши страницы

С++ для начинающих

Войти
Регистрация
Восстановить пароль
 
gamer0n
0 / 0 / 0
Регистрация: 27.12.2012
Сообщений: 47
#1

Переведите пожалуйста прогамму на С++ - C++

07.02.2013, 19:05. Просмотров 294. Ответов 4
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
program variant23;
uses crt;
var s,a:real;
n:integer;
Begin
clrscr;
writeln('Введите а');
read(a);
S:=0;
for n:=1 to 10 do
S:=S+(a+sqr(n));
writeln('Сума с начальным S=',S:4:2);
end.
Переведите плиз прогу на С++. Изначально она написана на Pascal
и сделайте плиз скрин ее работы)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.02.2013, 19:05
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Переведите пожалуйста прогамму на С++ (C++):

Переведите пожалуйста прогамму на С++ - C++
program ffair; var x,a,b:real; function Sign(x:real):integer; begin if a+b<0 then x:=-1 else if a+b=0 then ...

Переведите прогамму с паскаля на c++ - C++
program lnert; uses crt; cоnst h=0.2; var y,x:real; begin x:=-3; repeat y:=(sin(x*2))+6; x:=x+h; write('При x=', x:3:4); ...

Пожалуйста переведите из С++ в С(Си) - C++
Задание: Работа со строками. Найти длину самого короткого слова #include <string> #include <iostream> #include <sstream> using...

Переведите пожалуйста с CLIPS на C++ - C++
//Клипс не знаю вовсе, знаю, что семантика другая, но нужно что-то похожее, пожалуйста!!! (deffunction ask-question (?question) ...

переведите с Паскаля на си++ пожалуйста! - C++
в Паскале получается...а в СИ++ нет( procedure Mean(x,y:real; var AMean,GMean:real); begin AMean:=(x+y)/2; GMean:=sqrt(x * y); ...

Переведите пожалуйста с паскаля на с++ - C++
var i,j: integer; function lol(x: integer): integer; var i,k: integer; begin k:=0; for i:=1 to x-1 do if x mod i = 0 then ...

4
Стоян
3 / 3 / 0
Регистрация: 29.09.2012
Сообщений: 15
07.02.2013, 19:33 #2
Лучше бы просто написали, что программа должна делать, чем листинг на другом языке.
Я так понимаю, пользователь вводит значение "a", затем по циклу до 10 вычисляем "S", равное S=S+(a+sqr(n)), где sqr(n) - это площадь текущей итерации что-ли?
0
gamer0n
0 / 0 / 0
Регистрация: 27.12.2012
Сообщений: 47
07.02.2013, 19:44  [ТС] #3
Цитата Сообщение от Стоян Посмотреть сообщение
Лучше бы просто написали, что программа должна делать, чем листинг на другом языке.
Я так понимаю, пользователь вводит значение "a", затем по циклу до 10 вычисляем "S", равное S=S+(a+sqr(n)), где sqr(n) - это площадь текущей итерации что-ли?
------------10
условие: S= Σ (a+n2)
------------n=1
0
Пёс
228 / 76 / 4
Регистрация: 03.02.2013
Сообщений: 311
07.02.2013, 19:48 #4
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#include <iostream>
#include <cmath>
using namespace std;
void main()
{
    double a;
    cout << "Введите a";
    cin >> a;
    double s = 0;
    for(int n=1; n<11; n++)
        s += a+n*n;
    cout << s;
    system("pause");
}
Цитата Сообщение от gamer0n Посмотреть сообщение
сделайте плиз скрин ее работы)
Может Вам ещё лабу оформить?
0
Стоян
3 / 3 / 0
Регистрация: 29.09.2012
Сообщений: 15
07.02.2013, 20:00 #5
Код:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
#include <iostream>
#include <math.h>
 
int main ()
{
    float S=0, a;
    std::cout << "Введите а: ";
    std::cin >> a;
    for (int n=0; n<10; n++)
        S=S+(a+pow(n,2));
    std::cout << "Сумма S: " << S << std::endl;
    return 0;
}
Скриншот:
1
Миниатюры
Переведите пожалуйста прогамму на С++  
07.02.2013, 20:00
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.02.2013, 20:00
Привет! Вот еще темы с ответами:

Переведите пожалуйста прогу) - C++
Program m3; Uses CRT; Const n=5; m=5; k1=100; k2=k 1 *2+1; Type matr =array of integer; Var a :matr; i, j, f, ma...

Переведите, пожалуйста, с паскаля на C++ - C++
type Person = record Surname, Name, Adress, City: string; ...

переведите с паскаля на с++.пожалуйста - C++
uses crt; var i,j,n,k:integer; a:array of byte; begin Write ('Введите n='); Readln(n); clrscr; k:=0; j:=0; i:=1;

переведите с Паскаля на си++ пожалуйста! - C++
Дано имя файла и целое число N (0 &lt; N &lt; 27). Создать текстовый файл с указанным именем и записать в него N строк длины N; строка с номером...


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

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

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