( Вход | Регистрация | Поиск )

Помощь с задачами..., Очень срочно
Стандартный · [ Линейный ]
Дата обновления: 20.11.2008 - 16:47, перейти к новому сообщению
#1
SerG608

[FONT=Times][SIZE=5]
Помогите плис...
Мне надо 50 задач по програмированию на тему процедуры и функции, задачи могут быть любыми по сложности и реализованы на языке программирования - Pascal.
Буду очень благодарен...
Очень срочно...
unsure.gif
Пришлите плис условия и решенные задачь по мейлу ****@mail.ru

Еще рас спасибо...
! Предупреждение:
за рассылками идём на Subsribe


◄ Назад

Всего страниц: 2 

 1 2
 
Ответов(10 - 13)
20.11.2008 - 15:53 |#11
·Soloton
Группа: Наши Люди
Сообщений: 292
Code

const
N=9;
a: array [1..N] of byte = (1, 2, 3, 4, 5, 6, 7, 8, 9);
var
i, j: integer;
begin
for i := 1 to N-1 do begin
 for j := i to N-1 do begin
   write(a[i]);
   writeln(a[j]);
   end;
 end;
end.

Это для жёстко заданного массива.
20.11.2008 - 16:26 |#12
·D'm~
Группа: Пользователи
Сообщений: 159
de1ay,
Да, значит числа повторяться могут. Ступил я сначала..
yah,
С клавиатуры
Soloton,
Спасибо!
20.11.2008 - 16:36 |#13
·yah
Группа: Наши Люди
Сообщений: 2.336
Просто шикарно... на момент моего последнего сообщения программа была уже готова вместе с генератором целых чисел, но.... ВЫРУБИЛИ СВЕТ smile.gif

Добавлено:
Если еще нужна программа, в которой используется массив произвольной длинны, то отпишись.
20.11.2008 - 16:47 |#14
·D'm~
Группа: Пользователи
Сообщений: 159
Цитата | Quote(yah @ 20.11.2008 - 17:36)
Если еще нужна программа, в которой используется массив произвольной длинны, то отпишись.


Нет, не нужна, спасибо smile.gif
 
◄ Назад

Всего страниц: 2 

 1 2
 


task
SoftoRooM © 2004-2024