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

  #531  
Старый 16.05.2008, 01:01
Аватар для Sipitah
Sipitah
Новичок
Регистрация: 12.05.2008
Сообщений: 4
Провел на форуме:
12584

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

ещё надо :

Составьте процедуру Max_rearrange, находящую макс по модулю элемент в каждой строке квадратной матрицы A и осуществляющую его перестановку с соответствующим диагональным элементом !!!

Тоже надо решить! оч. прошу!!!
 
Ответить с цитированием

  #532  
Старый 16.05.2008, 16:52
Аватар для Garfi
Garfi
Участник форума
Регистрация: 02.02.2008
Сообщений: 106
Провел на форуме:
594791

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

Цитата:
Сообщение от Sipitah  
Надо найти сумму элементов последовательности x=(x1,x2,...,xn), начиная от первого отрицательного элемента и до конца последовательности!!!
Код:
uses crt;
var a: array [1..100] of longint;
    i,k,n,s:integer;
begin
clrscr;

{vvod elementov, k-kol-vo elementov}

for i:=a[1] to k do
if a[i]<0
then i:=n;

s:=0;
begin
for i:=a[n] to k do
s:=s+a[i];
end;

writeln(s:5:2);
readln;
end.
алгоритм набросал, дальше сам...
 
Ответить с цитированием

  #533  
Старый 16.05.2008, 17:13
Аватар для Sipitah
Sipitah
Новичок
Регистрация: 12.05.2008
Сообщений: 4
Провел на форуме:
12584

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

Пасибки
 
Ответить с цитированием

  #534  
Старый 18.05.2008, 22:28
Аватар для Far2k
Far2k
Новичок
Регистрация: 27.03.2008
Сообщений: 4
Провел на форуме:
84990

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

Так никто и незнает как первую часть задачки сделать? (Паскаль)

Разработать программу, которая позволяет найти площадь заштрихованной области:

1.вычислить площадь заштрихованной области по формулам, сост.разработанные программы по заданным конфигурациям

 
Ответить с цитированием

  #535  
Старый 19.05.2008, 08:14
Аватар для Kaban
Kaban
Участник форума
Регистрация: 19.03.2006
Сообщений: 286
Провел на форуме:
2547059

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

Привет, помогите пожалуйста с лабами по Delphi.

1) Данны 3 массива целых чисел: (4*5), (5*5), (5*4). Вставить после первого столбца, содержащего хотя бы один нулевой элемент, столбец из единиц. Использовать StringGrid.

2) Создать приложение, предлагающее пользователю ввести массив строк и выдающее минимальную длинну строки в массиве строк. Выделить самую короткую строку символом "!". Если строк с минимальной длинной несколько, выдать сообщение.

3) Имеется список, элементами которого являются вещественные числа. Создать консольное приложение, описывающее подпрограмму, которая добавляет в начало списка элемент, равный минимальному элементу в списке.

Помогите пожалуйста с этими лабами, а то я вообще не знаю Delphi и паскаль.
 
Ответить с цитированием

  #536  
Старый 19.05.2008, 09:51
Аватар для freddi
freddi
Постоянный
Регистрация: 05.07.2006
Сообщений: 458
Провел на форуме:
2943499

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

вопрос от Undernative:

Цитата:
Quant'овый (09:46:45 19/05/2008)
7. Сколько раз встречается заданное слово.
Определить, сколько раз в строке встречается заданное слово.


Quant'овый (09:46:53 19/05/2008)
Задача по строкам
на делфи. от меня и от него по +5 ))
 
Ответить с цитированием

  #537  
Старый 19.05.2008, 14:22
Аватар для krypt3r
krypt3r
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186

Репутация: 905


По умолчанию

Код:
program laba07;

var
  p, cnt : integer;
  str, sub : string;

begin
  write ('Vvedite stroku: ');
  readln (str);
  write ('Vvedite iskomuyu podstroku: ');
  readln (sub);
  cnt := 0;
  repeat
    p := pos (sub, str);
    if p > 0 then begin
      delete (str, 1, p + length (sub));
      inc (cnt);
    end;
  until p = 0;
  writeln ('Kolichestvo: ', cnt);
end.
 
Ответить с цитированием

  #538  
Старый 19.05.2008, 14:48
Аватар для CorAX
CorAX
Новичок
Регистрация: 28.02.2008
Сообщений: 14
Провел на форуме:
185526

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

Помогите плиз!
Нужно аписать игру "Пулемёт" на с++.
Правила игры. Пулемёт находится в нижнейчасти экрана, может перемещаться вправо и влево с помощью клавиш управлением курсора и стрелять. Слева направопо экрану перемещаются различные обьекты. При попадании из пулемёта объект взрывается.

Разработать иерархию классов для представления пулемёта и различных (два- три) типов объектов.
 
Ответить с цитированием

  #539  
Старый 19.05.2008, 23:57
Аватар для Delimiter
Delimiter
Banned
Регистрация: 08.04.2005
Сообщений: 446
Провел на форуме:
2187381

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

2 CorAX

С этим справиться не сложно. Просто тут в основном помогают тем, чей код может уместиться в качестве соурса! Ждать что будут делать проект заливать на слил.ру и выкладывать стцылку на него - ГЛУПО !
 
Ответить с цитированием

  #540  
Старый 20.05.2008, 15:54
Аватар для Ping.Win
Ping.Win
Новичок
Регистрация: 12.08.2007
Сообщений: 3
Провел на форуме:
27221

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

Зачет горит, нужна программа на Java
Создать двумерный массив и заполнить его сотней любых чисел и найти максимальное число. Помогите, есль не трудно, буду очень благодарен
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сюда выкладываем все проги для фрикринга мобильников, которых знаем! nigger Сотовый фрикинг 5 11.04.2009 11:15
Американским студентам запретили пользоваться Skype KPOT_f!nd Мировые новости 1 28.09.2006 03:47
Любителям квестов сюда!! FoX's Болталка 10 25.01.2005 20:42



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


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




ANTICHAT.XYZ