создайте программу которая считает сумму

24.11.2008, 20:04. **Показов** 1301. **Ответов** 7

Студворк — интернет-сервис помощи студентам

создайте программу которая считает сумму
S= a + b + c + d каждый в степени k (a b c d получают степень k)

@CilCatblack · 24.11.2008, 20:29

Вот примерный код

:

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
#include <stdio.h>
#include <math.h>
#include <stdlib.h>
void main()
{
int S,a,b,c,d,k,a1,b1,c1,d1,;
cout<<"Введите а:\n";
cin>>a;
cout<<"Введите b:\n";
cin>>b;
cout<<"Введите c:\n";
cin>>c;
cout<<"Введите d:\n";
cin>>d;
cout<<"Введите k:\n";
cin>>k;
a1=pow(a,k);
b1=pow(b,k);
c1=pow(c,k);
d1=pow(d,k);
S=a1+b1+c1+d1;
cout<<S<<"\n"
return 0;
}

Извините если есть ошибки

, но алгоритм верен

@Puporev · 24.11.2008, 20:37

Пожалуйста, не пишите впредь такие истерические заголовки, тошнит от них уже.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
function Step(x,y:integer):longint;{функция для нахождения целой степени числа}
var p,i:longint;
begin
p:=1;
for i:=1 to y do
p:=p*x;{умножаем к раз число на сабя}
Step:=p;
end;
var a,b,c,d,k,sum:longint;
begin
clrscr;
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
write('d=');readln(d);
write('k=');readln(k);
sum:=Step(a,k)+Step(b,k)+Step(c,k)+Step(d,k);
write('sum=',sum);
readln
end.

Добавлено через 1 минуту 23 секунды

Извините если есть ошибки, но алгоритм верен

Да ошибка одна, это С, а здесь пишут на Паскале.

@CilCatblack · 24.11.2008, 20:42

Добавлено через 1 минуту 23 секунды

Да ошибка одна, это С, а здесь пишут на Паскале.[/QUOTE]

Сори уже привык писать на С++, писал чисто автоматически еще раз сори!!!

24.11.2008, 20:49

Спасибо .............................большое при большое

24.11.2008, 21:37

А как написать рекурсивную программу эту же

24.11.2008, 22:14

Как написать рекурсивную программу эту же но в рекурсии

@Puporev · 25.11.2008, 07:07

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
function Step(x,y:integer):longint;
var p,i:longint;
begin
if y=1 then Step:=x
else Step:=Step(x,y-1)*x;//предыдущее значение функции умножаем на х
end;
var a,b,c,d,k,sum:longint;
begin
clrscr;
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
write('d=');readln(d);
write('k=');readln(k);
sum:=Step(a,k)+Step(b,k)+Step(c,k)+Step(d,k);
write('sum=',sum);
readln
end.

Новые блоги и статьи Все статьи Все блоги /
моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .

Кристиника

	создайте программу которая считает сумму 24.11.2008, 20:04. Показов 1301. Ответов 7 Метки нет (Все метки) создайте программу которая считает сумму S= a + b + c + d каждый в степени k (a b c d получают степень k)

@CilCatblack 5 / 5 / 1 Регистрация: 05.11.2007 Сообщений: 161
	24.11.2008, 20:42
	Добавлено через 1 минуту 23 секунды Да ошибка одна, это С, а здесь пишут на Паскале.[/QUOTE] Сори уже привык писать на С++, писал чисто автоматически еще раз сори!!! 0

кристиника
	24.11.2008, 20:49
	Спасибо .............................большое при большое

кристиника
	24.11.2008, 21:37
	А как написать рекурсивную программу эту же

nAssa
	24.11.2008, 22:14
	Как написать рекурсивную программу эту же но в рекурсии