Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.62/29: Рейтинг темы: голосов - 29, средняя оценка - 4.62
1 / 1 / 0
Регистрация: 06.04.2013
Сообщений: 58

√2+√2.+√2 N- корней

03.05.2013, 11:38. Показов 5993. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
√2+√2.+√2 N- корней . составьте программу по условию пожалуйста
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
03.05.2013, 11:38
Ответы с готовыми решениями:

Вычислить: s=bx√t+b*tg(tx+2.1)
Вычислить: s=bx√t+b*tg(tx+2.1); 1≤x≤2 x=0.2 0≤t≤1 y=0.2 b=3.5

Вычислить значение выражения j=((1+y)√sin^2(z)-|х-у|/5)^3
Вычислить значение выражения j=((1+y)√sin^2(z)-|х-у|/5)^3 (см во вложениях) За помощь, огромное спасибо!

построить графики функций: f1(x)=x*cos(2x), f2(x)=√x^2+2 , f3(x)= f1∙f2
Используя графические средства языка Паскаль ABC на одной координатной сетке построить графики функций: f1(x)=x*cos(2x), f2(x)=√x^2+2...

4
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
03.05.2013, 16:18
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
uses crt;
const nmax=20;
var s:real;
    n,i:integer;
begin
repeat
write('Êîëè÷åñòâî êîðíåé îò 1 äî 20 n=');
read(n);
until n in [1..20];
s:=sqrt(2);
for i:=n-1 downto 1 do
s:=sqrt(2+s);
write('s=',s:0:3)
end.
0
55 / 52 / 58
Регистрация: 04.04.2013
Сообщений: 102
03.05.2013, 17:31
Можно проще:
Pascal
1
2
3
4
5
6
7
8
9
10
11
uses crt;
var s:real;
n:integer;
begin
clrscr;
write('Collichestvo korney: ');
readln(n);
s:=sqrt(2)*n;
write('S=',s:0:4);
readkey;
end.
1
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
03.05.2013, 17:52
Проще не значит правильнее, он просто неверно записал задание, там все время берется корень из полученного ранее результата, корни под корнем.
Типа такой формула..
Добавлено через 13 минут
https://www.cyberforum.ru/cgi-bin/latex.cgi?\sqrt{2+\sqrt{2+\sqrt{2}}}
0
55 / 52 / 58
Регистрация: 04.04.2013
Сообщений: 102
03.05.2013, 19:05
Я понял. А если так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
uses crt;
var s:real;
n:integer;
begin
clrscr;
write('Kollichestvo korney: ');
readln(n);
for n:=n downto 1 do s:=sqrt(2+s);
write('S=',s:0:4);
readkey;
end.
На одну переменную меньше.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
03.05.2013, 19:05
Помогаю со студенческими работами здесь

Найти сумму 12 членов ряда, в котором a_n=n^3/(2^√n)
Найти сумму 12 членов ряда, в котором a_n=n^3/(2^√n) Добавлено через 11 минут Используя оператор цикла, найти сумму элементов

Цикл: Вычислить значение выражения a=1/2arccos(√(2+√(2+√(2+√(2+√(2+√(2+√(2+√(2+√(2+(√2)
Здравствуйте!Нужна помощь в составлении программы или помощь в решении. a=1/2arccos(√(2+√(2+√(2+√(2+√(2+√(2+√(2+√(2+√(2+(√2) Спасибо!

Вычислить S(i)=√(x-m)2/N-1
Задана последовательность N вещественных чисел. Вычислить S(i)=√(x-m)2/N-1,где M-среднее арифметическое данной последовательности. ...

Вычислить значение √2+(√2(2+...+√(2+√2))...) (всего N корней)
Разработайте программу в с#, которая вычисляет √2+(√2(2+...+√(2+√2))...). Всего N корней. Если напишите хорошую прогу, могу отблагодарить...

Программирую калькулятор, как прописать код для кнопок y√x. 3√x. √x
var pamet:string; Form1: TForm1; znachenie:byte; x:real; y:real;


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru