М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Oormeero
Oormeero
12.05.2021 20:29 •  Информатика

Паскаль,написать код. найти сумму числового ряда: 1^m + 2^m + 3^m + +n^m

👇
Ответ:
ксения6538
ксения6538
12.05.2021
//Pascal ABC.Net 3.0, сборка 1053
var
  n,m,i:integer;
  s:double;
begin
  Write('Введите натуральные значения n и m: ');
  Read(n,m);
  s:=0;
  for i:=1 to n do s:=s+exp(m*ln(i));
  Writeln('Сумма ряда равна ',s)
end.

Тестовое решение:
Введите натуральные значения n и m: 5 8
Сумма ряда равна 462979

Введите натуральные значения n и m: 30 40
Сумма ряда равна 1.62897283055013E+59
4,5(56 оценок)
Ответ:
Нєдєля
Нєдєля
12.05.2021
//PascalABC.NET
var
n,m,i:integer;
sum:real;
begin
readln(n,m);
for i:=1 to n do
sum:=sum+power(i,m);
writeln(sum);
end.
4,7(97 оценок)
Открыть все ответы
Ответ:

#include <iostream>

using namespace std;

int main ()

{

   setlocale(0, "");

   int i = 0; // инициализируем счетчик цикла.

   int sum = 0; // инициализируем счетчик суммы.

   do {// выполняем цикл.

       i++;

       sum += i;

   } while (i < 1000); // пока выполняется условие.

   cout << "Сумма чисел от 1 до 1000 = " << sum << endl;

   return 0;

}

Объяснение:

Цикл do while

Цикл do while очень похож на цикл while. Единственное их различие в том, что при выполнении цикла do while один проход цикла будет выполнен независимо от условия. Решение задачи на поиск суммы чисел от 1 до 1000, с применением цикла do while.

Принципиального отличия нет, но если присвоить переменной i значение, большее, чем 1000, то цикл все равно выполнит хотя бы один проход.

4,6(35 оценок)
Ответ:
voprosik003
voprosik003
12.05.2021
type goods = record  name:String;  price:real;  end;const GOODS_COUNT = 5;var goodsList:array[1..GOODS_COUNT] of goods;id:integer;begin  goodsList[1].name:='iPhone 5s';  goodsList[1].price:=760.0;  goodsList[2].name:='Samsung Galaxy s5';  goodsList[2].price:=540.0;  goodsList[3].name:='Simens m60';  goodsList[3].price:=12.5;  goodsList[4].name:='HTC ONE X';  goodsList[4].price:=450.5;  goodsList[5].name:='LG L9';  goodsList[5].price:=600.0;    write('Write goods id:');  readln(id);  if ( ( id < 0 ) or ( id > GOODS_COUNT ) ) then    writeln('WRONG ID')  else    writeln(goodsList[id].name,' price =',goodsList[id].price);    end.
4,5(58 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ