Вопрос по информатике:
Потрібно перетворити в мову програмування С++
program project_420_2;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
x,y,s:real;
i,j:byte;
begin
y:=1;
s:=1;
write('X = ');
readln(x);
for i:=1 to 5 do
begin
for j:=1 to 4 do
s:=s*(i*j+1)/2*x;
y:=y*s;
end;
writeln('Y = ',y);
readln;
end.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 27.08.2015 14:16
- Информатика
- remove_red_eye 10102
- thumb_up 21
Ответы и объяснения 1
using namespace std;
int main() {
double x, y, s;
int i, j;
y = 1;
s = 1;
cout << "X = ";
cin >> x;
for (i = 1; i <= 5; i++) {
for (j = 1; j <= 4; j++)
s = s * (i * j + 1)/2 * x;
y = y * s;
}
cout << "Y = " << y << endl;
system("pause");
return 0;
}
- 28.08.2015 18:23
- thumb_up 16
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.