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

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
urbic
130 / 121 / 46
Регистрация: 27.09.2012
Сообщений: 484
#1

Вычислить значение суммы используя все виды циклов - Turbo Pascal

28.05.2014, 12:23. Просмотров 340. Ответов 4
Метки нет (Все метки)

Написать программу с использованием циклов (с пост условием, предусловием, с параметром)
0
Изображения
 
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.05.2014, 12:23
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вычислить значение суммы используя все виды циклов (Turbo Pascal):

Написать программы, используя различные виды циклов. - Turbo Pascal
Написать программы, используя различные виды циклов. Вычислить: 1. Сумму первых N четных натуральных чисел; 2. Произведение первых...

Вычислить значение выражения, используя операторы циклов - Turbo Pascal
составить программу , содержащую операторы циклов и обеспечивающую вычисление значения величины y=...

Вычислить 10!, используя все три вида циклов - Pascal
Вычислить 10!, используя все три вида циклов.(Цыклы) Массивы одномерные-1. Программа. Дана последовательность из 100 различных целых...

Вычислить сумму ряда, используя разные типы циклов - Pascal
составить три программы вычисления суммы ряда, где n, меняется от 1 до 10, используя цикл с параметром, цикл с постусловием и цикл с...

Вычислить значение функции с помощью вложенных циклов - Turbo Pascal
помогите решить задачу используя вложенный цикл. Нужно вычислить значение функции p=sin(y*x+h)*x*x*x y=0.7(0.2)2.1 ...

Вычислить значение функции двумя видами циклов - Pascal
Составить 2 программы с циклом: 1. Цикл с предусловием 2. Цикл с постусловием

4
Svager
394 / 374 / 212
Регистрация: 14.09.2013
Сообщений: 1,202
28.05.2014, 15:53 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uses crt;
var s:real;
    x,k,n,step:integer;
begin
 write('n=');
  readln(n);
 write('x=');
  readln(x);
 s:=0;step:=1;
  for k:=1 to n do
   begin
    step:=step*x;
    s:=s+((step+3)/(2*k));
   end;
 writeln('S = ',s:0:2);
end.
Добавлено через 1 минуту
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var s:real;
    x,k,n,step:integer;
begin
 write('n=');
  readln(n);
 write('x=');
  readln(x);
 s:=0;step:=1;k:=1;
  while k<=n do
   begin
    step:=step*x;
    s:=s+((step+3)/(2*k));
    inc(k);
   end;
 writeln('S = ',s:0:2);
end.
Добавлено через 3 минуты
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uses crt;
var s:real;
    x,k,n,step:integer;
begin
 write('n=');
  readln(n);
 write('x=');
  readln(x);
 s:=0;step:=1;k:=0;
  repeat
   inc(k);
   step:=step*x;
   s:=s+((step+3)/(2*k));
  until k=n;
 writeln('S = ',s:0:2);
end.
1
urbic
130 / 121 / 46
Регистрация: 27.09.2012
Сообщений: 484
28.05.2014, 19:20  [ТС] #3
Скажите откуда переменная n?
0
Svager
394 / 374 / 212
Регистрация: 14.09.2013
Сообщений: 1,202
28.05.2014, 21:08 #4
urbic, ну это у вас на рисунке t , то есть кол-ство итераций
0
urbic
130 / 121 / 46
Регистрация: 27.09.2012
Сообщений: 484
28.05.2014, 21:16  [ТС] #5
Спасибо
0
28.05.2014, 21:16
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.05.2014, 21:16
Привет! Вот еще темы с ответами:

Вычислить значение функции с помощью вложенных циклов - Turbo Pascal
Застрял на задаче. Блок-схему составил, а вот до нормально составленной программы допереть не могу :( Прошу вашей помощи.

Используя косвенную рекурсию, для заданных n и x вычислите значение суммы - Pascal
Здравсствуйте форумчане требуется помощь с рекурсие &quot;Используя косвенную рекурсию, для заданных n и x вычислите значение суммы&quot; ну как я...

Используя косвенную рекурсию, для заданных n и x вычислите значение суммы - Pascal
Используя косвенную рекурсию, для заданных n и x вычислите значение суммы:

Используя косвенную рекурсию, для заданных n и x вычислите значение суммы - Turbo Pascal
Ребята помогите пожалуйста осталось 1 лаба что бы допустили к экзаменам. Используя косвенную рекурсию, для заданных n и x вычислите...


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

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

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