ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Оффтоп > Болталка
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

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

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

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

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

Репутация: 270
Отправить сообщение для art2222 с помощью ICQ
По умолчанию

А тут решать нечего
Код:
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==_
_==wolf==_
Участник форума
Регистрация: 29.05.2008
Сообщений: 181
Провел на форуме:
979048

Репутация: 101
Отправить сообщение для _==wolf==_ с помощью ICQ
По умолчанию

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



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



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


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




ANTICHAT.XYZ