Задачи на Pascal | SEclub.org
Задачи на Pascal
Все новые
-rescue-, воспользуйся гуглом, или даже википедией! Например ru.wikipedia.org/wiki/%D0%A1%D0%BE%D1%80%D1%82%D0%B8%D1%80%D0%BE%D0%B2%D0%BA%D0%B0_%D0%BF%D1%83%D0%B7%D1%8B%D1%80%D1%8C%D0%BA%D0%BE%D0%BC - самый простой для понимания алгоритм.

Ссылка на пост
Всего сообщений: 511
*
-rescue-
6 дек 2008 в 16:30
Памогите решить задачу на массив. Дано ряд а(1), а(2), а(3) ..., а(N). Найти сколька чисел >0 в этом ряду.
*
-rescue-
6 дек 2008 в 17:20
К чему-то додумалса ))) ыы
*
CXakep75
6 дек 2008 в 18:07
cHeRsAnYa1, ггг, если число больше, чем 2х значное как?
*
cHeRsAnYa1
7 дек 2008 в 09:49
CXakep75, seclub.org/forum/goto/5945945/ + кусок кода upwap.ru/239882
*
-rescue-
7 дек 2008 в 13:03
Дайте пожалуста примерный код на сортировку массива ( от меньшего до большего числа)
*
cHeRsAnYa1
7 дек 2008 в 18:06
-rescue-, воспользуйся гуглом, или даже википедией! Например ru.wikipedia.org/wiki/%D0%A1%D0%BE%D1%80%D1%82%D0%B8%D1%80%D0%BE%D0%B2%D0%BA%D0%B0_%D0%BF%D1%83%D0%B7%D1%8B%D1%80%D1%8C%D0%BA%D0%BE%D0%BC - самый простой для понимания алгоритм.
*
Dig9OO
8 дек 2008 в 03:29
-rescue-, for i:=1 to n-1 do for j:=i+1 to n do if a>a[j] then {меняем местами a и a[j]}
8 дек 2008 в 03:37 / Dig9OO (2)
*
valvE212
8 дек 2008 в 07:06
Dig9OO, ток где у тя a стоит, надо a(i) поставить ток скобки квадратные :-)
8 дек 2008 в 07:08 / valvE212 (3)
*
-rescue-
8 дек 2008 в 08:24
Dig9OO, А если массив 10х5 ? то буд так ? for i:=1 to 9 do for k:=1 to 4 do for j:=i+1 to 10 do for j1:=k+1 to 5 do if a>a[j,j1] ??
*
valvE212
8 дек 2008 в 19:10
-rescue-, Делай так For i:=1 to n-1 do for j:=i+1 to n-1 do begin k:=i+1; s:=j+1; if a[i,j]>a[k,s] then r:=a[i,j]; a[i,j]:=a[k,s]; a[k,s]:=r; end;
8 дек 2008 в 19:12 / valvE212 (1)
*
Arslanali
8 дек 2008 в 19:20
КK!LT,
*
LtiomaP
8 дек 2008 в 19:54
-rescue-, a,b:integer; a:= 56 div 10; b:= 56 mod 10; обычно так я выкручиваюсь
Скачать тему
Для полноценного использования разделов сайта войдите или зарегистрируйтесь.
Создание сайтов и программирование | Компьютеры | Форум | Главная
18+ © Seclub.org 2003-2025