HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ОФФТОП > Болталка
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

помогите решить задачу Q BASIC
  #1  
Старый 23.05.2009, 15:35
Яеbz
Banned
Регистрация: 22.05.2009
Сообщений: 7
С нами: 8932291

Репутация: -2
По умолчанию помогите решить задачу Q BASIC

СОСТАВИТЬ ЗАДАЧУ ДЛЯ РЕШЕНИЯ КВАДРАТНОГО УРАВНЕНИЯ АХ^2+BX+C=0
 
Ответить с цитированием

  #2  
Старый 23.05.2009, 17:22
art2222
Участник форума
Регистрация: 28.04.2008
Сообщений: 172
С нами: 9492347

Репутация: 270
По умолчанию

А тут решать нечего
Код:
input a,b,c
d = b^2-4*a*c
if d=0 then print "x=";-b/2*a
if d>0 then
  print "x1=";(-b-sqrt(d))/2*a
  print "x2=";(-b+sqrt(d))/2*a
endif
вроде так, давно на бейске не писал.

Последний раз редактировалось art2222; 23.05.2009 в 17:25..
 
Ответить с цитированием

  #3  
Старый 23.05.2009, 17:29
_==wolf==_
Участник форума
Регистрация: 29.05.2008
Сообщений: 181
С нами: 9448197

Репутация: 101
По умолчанию

наиацкейший школьнег 2009 года...
 
Ответить с цитированием
Ответ



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Требуется решить задачу по ТОС Горностай Freelance - О Работе 0 06.05.2009 06:32
помогите решить задачку Vba + Excel hellp123 С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby 0 12.03.2009 09:36
Помогите решить проблему. Notification Area. Niard Болталка 0 02.02.2006 08:11



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.