Форум программистов, компьютерный форум, киберфорум
PowerShell
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/18: Рейтинг темы: голосов - 18, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 15.12.2014
Сообщений: 21

Напишите программу, которая по вводимым параметрам A, B, C находит корни квадратного уравнения

21.03.2016, 14:56. Показов 3677. Ответов 9
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Товарищи, помогите решить задачку :
Напишите программу используя PowerShell, которая по вводимым параметрам A, B, C находит корни квадратного уравнения.
Заранее спасибо)
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
21.03.2016, 14:56
Ответы с готовыми решениями:

Напишите функцию, которая находит корни квадратного уравнения
Напишите функцию, которая находит корни квадратного уравнения ax2+bx+c=0 и записывает результат в переменные типа double, передаваемые по...

Напишите функцию которая находит корни квадратного уравнения ax^2+bx+c=0
Напишите функцию которая находит корни квадратного уравнения ax^2+bx+c=0 и записывает результат в переменные типа double, передаваемые по...

Напишите функцию, которая находит корни квадратного уравнения
3. Напишите функцию, которая находит корни квадратного уравнения ax^2+bx+c=0 и записывает результат в переменные типа double, передаваемые...

9
 Аватар для KDE777
1886 / 1108 / 428
Регистрация: 22.01.2016
Сообщений: 3,050
21.03.2016, 15:56
Цитата Сообщение от denisy4 Посмотреть сообщение
Напишите программу используя PowerShell, которая по вводимым параметрам A, B, C находит корни квадратного уравнения.


PowerShell
1
2
3
4
5
6
7
8
9
10
11
[double]$a = 5
[double]$b = -7
[double]$c = 2
 
Write-Host "$a*X² + $b*X + $c = 0"
 
$D = $b*$b4*$a*$c
 
if($D -gt 0){Write-Host "X1 =" ((-1*$b + [Math]::Sqrt($D))/(2 * $a)); Write-Host "X2 =" ((-1*$b - [Math]::Sqrt($D))/(2 * $a))}
elseif($D -eq 0){Write-Host "X1 = X2 =" (-1 * $b/(2 * $a))}
else{"уравнение не имеет решения"}
0
0 / 0 / 0
Регистрация: 15.12.2014
Сообщений: 21
22.03.2016, 12:35  [ТС]
не работает(
0
 Аватар для KDE777
1886 / 1108 / 428
Регистрация: 22.01.2016
Сообщений: 3,050
22.03.2016, 12:56
Цитата Сообщение от denisy4 Посмотреть сообщение
не работает
А точнее? Какая ошибка?
Миниатюры
Напишите программу, которая по вводимым параметрам A, B, C находит корни квадратного уравнения  
0
0 / 0 / 0
Регистрация: 15.12.2014
Сообщений: 21
22.03.2016, 15:23  [ТС]
А вот сейчас я понял, что ничего не понял. я тупо вставлял текст в ПШ, и он естественно ругался что неизвестные командлеты(( Единственное что смущает что переменные изначально задаются , нет предложения ввода как на паскале ( эх, паскалюшка(( )
0
 Аватар для KDE777
1886 / 1108 / 428
Регистрация: 22.01.2016
Сообщений: 3,050
22.03.2016, 15:47
Лучший ответ Сообщение было отмечено denisy4 как решение

Решение

Цитата Сообщение от denisy4 Посмотреть сообщение
я тупо вставлял текст в ПШ, и он естественно ругался что неизвестные командлеты
Вы текст ошибки скопируйте и покажите здесь. В этом скрипте из командлетов только Write-Host + оператор if

Цитата Сообщение от denisy4 Посмотреть сообщение
Единственное что смущает что переменные изначально задаются , нет предложения ввода
PowerShell
1
2
3
4
5
6
7
8
9
10
11
[double]$a = Read-Host -Prompt 'Введите коэффициент A'
[double]$b = Read-Host -Prompt 'Введите коэффициент B'
[double]$c = Read-Host -Prompt 'Введите коэффициент C'
 
Write-Host "$a*X^2 + $b*X + $c = 0"
 
$D = $b*$b4*$a*$c
 
if($D -gt 0){Write-Host "X1 =" ((-1*$b + [Math]::Sqrt($D))/(2 * $a)); Write-Host "X2 =" ((-1*$b - [Math]::Sqrt($D))/(2 * $a))}
elseif($D -eq 0){Write-Host "X1 = X2 =" (-1 * $b/(2 * $a))}
else{"уравнение не имеет решения"}
Добавлено через 5 минут
Кликните здесь для просмотра всего текста

Code
1
2
3
4
5
6
Введите коэффициент A: 1
Введите коэффициент B: -2
Введите коэффициент C: -3
1*X^2 + -2*X + -3 = 0
X1 = 3
X2 = -1
0
0 / 0 / 0
Регистрация: 15.12.2014
Сообщений: 21
22.03.2016, 16:07  [ТС]
Как то так
Миниатюры
Напишите программу, которая по вводимым параметрам A, B, C находит корни квадратного уравнения  
0
 Аватар для KDE777
1886 / 1108 / 428
Регистрация: 22.01.2016
Сообщений: 3,050
22.03.2016, 16:35
Цитата Сообщение от denisy4 Посмотреть сообщение
Как то так
Вы ввели построчно код скрипта в PS-консоль - так делать не надо Таким образом каждая строка выполняется отдельно, а в скрипте может быть конструкция на несколько строк, например:
PowerShell
1
2
if($false){}
else{Write-Host 'Test'}
Сохраните весь скрипт в файл ps1 и выполните его из powershell, а лучше используйте powershell_ise.exe и запускайте скрипты оттуда...

Добавлено через 1 минуту
и кстати, на вашем скриншоте квадратное уравнение решилось не смотря на сообщение об ошибке
Изображения
 
0
0 / 0 / 0
Регистрация: 15.12.2014
Сообщений: 21
22.03.2016, 16:53  [ТС]
Пасиб, разобрался. ПШ_исе нормальная штука такая
0
 Аватар для KDE777
1886 / 1108 / 428
Регистрация: 22.01.2016
Сообщений: 3,050
22.03.2016, 17:32
Цитата Сообщение от denisy4 Посмотреть сообщение
разобрался

Не по теме:

если только взялись за PowerShell, тогда вот так вам будет наглядней:

Кликните здесь для просмотра всего текста

PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Clear-Host
 
[double]$a = Read-Host -Prompt 'Введите коэффициент A'
[double]$b = Read-Host -Prompt 'Введите коэффициент B'
[double]$c = Read-Host -Prompt 'Введите коэффициент C'
 
Write-Host "$a*X^2 + $b*X + $c = 0"
 
$D = $b*$b4*$a*$c # вычисляем дискриминант
 
if ($D -gt 0)
{
    Write-Host "X1 =" ((-1*$b + [Math]::Sqrt($D))/(2 * $a))
    Write-Host "X2 =" ((-1*$b - [Math]::Sqrt($D))/(2 * $a))
}
elseif ($D -eq 0)
{
    Write-Host "X1 = X2 =" (-1*$b/(2 * $a))
}
else {Write-Host "уравнение не имеет решения"}

2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
22.03.2016, 17:32
Помогаю со студенческими работами здесь

Напишите рекурсивную программу которая находит с точностью EPS корень уравнения
Напишите рекурсивную программу, которая по заданным A, B и EPS методом деления отрезка пополам находит с точностью EPS корень уравнения...

Функция, которая ищет корни квадратного уравнения
Функция, которая ищет корни квадратного уравнения. Написать функцию поиска дискриминанта, первого корня, второго

Создать программу, в которой определяется дискриминант, и вычисляются корни квадратного уравнения
Помогите пожалуйста написать код )

Цикл: Написать программу, считающую корни квадратного уравнения через дискриминант...
Добрый день, дали задание, написать программу, чтобы считала корни через дискриминант. Необходимо поставить ограничение по вводу символов...

Напишите функцию, 1.которая переворачивает строку 2.вычисления корней квадратного уравнения
ПОЖАЛУЙСТА ВЫРУЧИТЕ, ПОМОГИТЕ НАПИСАТЬ ПРОГИ: 1) Напишите функцию, которая переворачивает строку (массив типа char). Используйте цикл...


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

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Новые блоги и статьи
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru