Программа, вычисляющая действительные корни квадратного уравнения ...

@Юд · Регистрация: 30.05.2011

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

Нужно прописать задачи,без понятия как:
1. Программа, вычисляющая действительные корни квадратного уравнения (ax^2+bx+c).
Параметры a,b,c — действительные и вводятся с клавиатуры.
2. Программа, вычисляющая факториал натурального числа n, вводимого с клавиатуры.
3. Программа, вычисляющая наибольший общий делитель натуральных числе a и b, не
равных 0.
4. Программа, вычисляющая значение выражения:
• Ax+6x^2+4Bx при x>0
• -Ax+6x^2+4B при x<=0.
A,B,x вводятся с клавиатуры (А и B натуральные, x - действительное).
6. Программа, выводящая все простые числа от 1 до N (N вводится с клавиатуры).
7. Программа, вычисляющая площадь произвольного треугольника со сторонами a,b,c
(натуральные числа, вводятся с клавиатуры).
8. Программа, вычисляющая квадраты всех натуральных чисел меньше N, без
использования операции умножения.
Создать несколько вариантов программы, использующие целые и действительные числа
различной размерности. Привести результаты тестирования программы для всех вариантов.

@Avazart · 30.05.2011, 05:05

Это нестолько задача программирования сколько математики. В чем конкретно сложность?

Для реализации нескольких вариантов можно использовать родовые ф-ции (шаблоны).

@Юд · 30.05.2011, 09:36 **[ТС]**

Просто заочка,экзамен на носу,а по каким принципам писать и как никто не объяснил

@Avazart · 30.05.2011, 16:23

1. Имеется ввиду ax^2+bx+c = 0 ?
тогда

C++
1
2
3
4
5
6
7
float a,b,c,x1,x2;
a=StrToFloat(Edit1->Text);
b=StrToFloat(Edit2->Text);
c=StrToFloat(Edit3->Text);
 
x1=(-b+2*sqrt(b*b-4*a*c)) / (2*a);
x2=(-b-2*sqrt(b*b-4*a*c)) / (2*a);

осталось предусмотреть деление на на "0" и извлечение корня.

http://kvadur.info/

@Ev[G]eN · 31.05.2011, 00:29

Сообщение от Юд

8. Программа, вычисляющая квадраты всех натуральных чисел меньше N, без
использования операции умножения.

Pascal
1
2
3
4
5
6
7
var
 i, n: integer;
begin
 readln(n);
  for i:=1 to n do
   write(sqr(i), ' ');
end.

Добавлено через 5 минут

Сообщение от Юд

4. Программа, вычисляющая значение выражения:
• Ax+6x^2+4Bx при x>0
• -Ax+6x^2+4B при x<=0.

Pascal
1
2
3
4
5
6
7
var
 a, b, x: integer;
begin
 readln(a, b, x);
  if x>0 then write(a*x+6*exp(ln(x)*2)+4*b*x);
  if x<=0 then write(-a*x+6*exp(ln(x)*2)+4*b);
end.

Добавлено через 7 минут

Сообщение от Юд

7. Программа, вычисляющая площадь произвольного треугольника со сторонами a,b,c

Pascal
1
2
3
4
5
6
7
8
9
10
var
 a, b, c: integer;
 S, p: real;
begin
 readln(a, b, c);
 p:=(a+b+c)/2;
 writeln(p);
 S:=sqrt(p*(p-a)*(p-b)*(p-c));
 writeln(S);
end.

Добавлено через 28 секунд

Сообщение от Юд

7. Программа, вычисляющая площадь произвольного треугольника со сторонами a,b,c

Pascal
1
2
3
4
5
6
7
8
9
10
var
 a, b, c: integer;
 S, p: real;
begin
 readln(a, b, c);
 p:=(a+b+c)/2;
 writeln(p);
 S:=sqrt(p*(p-a)*(p-b)*(p-c));
 writeln(S);
end.

Добавлено через 5 минут

Сообщение от Юд

1. Программа, вычисляющая действительные корни квадратного уравнения (ax^2+bx+c).
Параметры a,b,c — действительные и вводятся с клавиатуры.

Pascal
1
2
3
4
5
6
7
8
9
10
var
 a, b, c: integer;
 x1, x2, d: real;
begin
 readln(a, b, c);
 d:=sqrt(b*b-4*a*c);
 x1:=(-b+d)/(2*a);
 x2:=(-b-d)/(2*a);
 writeln('x1 = ', x1, '; x2 = ', x2);
end.

проверки дописывайте сами

@Avazart · 31.05.2011, 01:09

2. Самое простое

C++
1
2
3
4
5
6
int factorial(int n)
 {
  int z=1;
  for (int i=1; i <= n; i++) z*=i;
  return z;
  }

@Ev[G]eN · 31.05.2011, 01:12

Не по теме:

Avazart, это не раздел С++..будьте добры писать решение на Pascal или же перейдите к нужному Вам разделу

@Юд · 04.06.2011, 11:44 **[ТС]**

Спасибо всем огромное!!

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .

@Юд 0 / 0 / 0 Регистрация: 30.05.2011 Сообщений: 3

	Программа, вычисляющая действительные корни квадратного уравнения ... 30.05.2011, 03:30. Показов 8013. Ответов 7 Метки нет (Все метки) Нужно прописать задачи,без понятия как: 1. Программа, вычисляющая действительные корни квадратного уравнения (ax^2+bx+c). Параметры a,b,c — действительные и вводятся с клавиатуры. 2. Программа, вычисляющая факториал натурального числа n, вводимого с клавиатуры. 3. Программа, вычисляющая наибольший общий делитель натуральных числе a и b, не равных 0. 4. Программа, вычисляющая значение выражения: • Ax+6x^2+4Bx при x>0 • -Ax+6x^2+4B при x<=0. A,B,x вводятся с клавиатуры (А и B натуральные, x - действительное). 6. Программа, выводящая все простые числа от 1 до N (N вводится с клавиатуры). 7. Программа, вычисляющая площадь произвольного треугольника со сторонами a,b,c (натуральные числа, вводятся с клавиатуры). 8. Программа, вычисляющая квадраты всех натуральных чисел меньше N, без использования операции умножения. Создать несколько вариантов программы, использующие целые и действительные числа различной размерности. Привести результаты тестирования программы для всех вариантов. 0

@Avazart 8488 / 6155 / 615 Регистрация: 10.12.2010 Сообщений: 28,683 Записей в блоге: 30
	30.05.2011, 05:05
	Это нестолько задача программирования сколько математики. В чем конкретно сложность? Для реализации нескольких вариантов можно использовать родовые ф-ции (шаблоны). 0

@Юд 0 / 0 / 0 Регистрация: 30.05.2011 Сообщений: 3
	30.05.2011, 09:36 [ТС]
	Просто заочка,экзамен на носу,а по каким принципам писать и как никто не объяснил 0

@Ev[G]eN
	31.05.2011, 01:12
	Не по теме: Avazart, это не раздел С++..будьте добры писать решение на Pascal или же перейдите к нужному Вам разделу 0

@Юд 0 / 0 / 0 Регистрация: 30.05.2011 Сообщений: 3
	04.06.2011, 11:44 [ТС]
	Спасибо всем огромное!! 0