Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.06.2013, 15:23   #1
SmokeScreen
 
Регистрация: 17.06.2013
Сообщений: 4
По умолчанию Даны В1 - В8; у1 - у7. Определить.

SmokeScreen вне форума Ответить с цитированием
Старый 17.06.2013, 16:42   #2
VIK_aka_TOR
Участник клуба
 
Аватар для VIK_aka_TOR
 
Регистрация: 30.01.2011
Сообщений: 1,578
По умолчанию

Код:

sum_b := 0;
  for i := 1 to 8 do
    sum_b := sum_b + beta[i];
sum_g := 0;
   for i:=1 to 7 do
     sum_g := sum_g + gamma[i];

for j := 1 to 7 do
  alpha[j] := sum_b + gamma[j]*sum_g;
пишу код не только за печеньки
VIK_aka_TOR вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
даны натуральные числа n и k (assembler). определить к-ую справа цифру n. Asel01 Помощь студентам 2 26.02.2013 19:06
Visual Basic.Даны x1,x2,x3.Определить a,b. Димон77 Помощь студентам 2 17.01.2013 19:40
Даны 2 текстовых файла с целыми числами.Определить совпадают ли эти файлы? Proskurina Помощь студентам 2 28.05.2012 11:31
Даны числа а1, a2, …, а10. Определить сумму их квадратов. Maks:// Помощь студентам 1 22.01.2009 15:24
Даны 3 точки определить треугольник. soldm Помощь студентам 14 06.10.2008 14:43