IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Решаем не сложные задачи на разные темы., задачи на циклы, массивы, строки.
brut03
сообщение 19.04.2004 13:12
Сообщение #1





Группа: Пользователи
Сообщений: 9

Репутация: -  0  +


Вот они: unsure.gif

1) В заданной последовательности определить максимальное количество подряд идущих положительных чисел. (Без использования массива)

2) Дано натуральное число N (N>9) определить количество нулей в цифровой записи числа, кроме нулей в младших разрядах. Пример: N=10025000 - количество нулей = 2.

3) На отрезке [2;n] найти все натуральные числа, сумма цифр которых при умножении числа на А не изменится.

4) Определить наименьший элемент каждой четной строки матрицы А размера [M;N].

5) Дана квадратичная матрица порядка М. Повернуть ее на
а) 90; б) 180; в) 270 градусов в положительном направлении.

6) На отрезке [100;N] ((2^10)<N<(2^31)) найти количество чисел, составленных из цифр a, b, c.

7) Составить программу перевода данного натурального числа в р- ичную систему счисления. (2<=p<=9)


Помогите пожалуйста, если не сложно. sad.gif sad.gif sad.gif
Заранее благодарен! unsure.gif

Сообщение отредактировано: brut03 - 20.04.2004 16:39


--------------------
Бывает в жизни так хреново
Что даже чай не лезит в глотку
А лезит в глотку только пиво
Которым запиваеш водку
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
brut03   Решаем не сложные задачи на разные темы.   19.04.2004 13:12
Poison   1. Program One; var ... begin for i:=1 to n do...   19.04.2004 16:07
Altair   6. var s:string; i:byte; o,z:byte; ...   19.04.2004 16:50
fms   1. Program odin; var a:array[1..n] of ...   19.04.2004 23:06
fms   4. program chetyre; var a:array[1,n] o...   19.04.2004 23:11
fms   2. program dva; var s,kol,k:integer; fl:bo...   19.04.2004 23:17
Altair   1. БЕЗ МАССИВА uses crt; var i:integer; {ўў®¤...   20.04.2004 17:33
fms   2. я так понимаю что для типа integer это число сл...   21.04.2004 1:40
Atos   6. {Предполагаем, что введённые цифры a,b,c различ...   21.04.2004 4:22
fms   3. program tri; var a,s,s2,k,k2,i,sum,sum2,n:i...   21.04.2004 21:49
Spawn   1. Еще один вариант первой задачи: program one...   21.04.2004 22:43
Spawn   4. program four(input,output); var A ...   21.04.2004 22:57
Altair   7. (я же сказал, читаем FAQ!!!!...   22.04.2004 6:23
Александр   помогите мне пожалуйста в решении следующих задач ...   24.04.2004 13:49
Altair   1. (а это совпадение, что у вас тоже 7 задач, или ...   24.04.2004 14:12
Altair   2. var i,j,k:integer; begin readln(i...   24.04.2004 14:19
Altair   3. const MaxN=100; var a:array[1..MaxN...   24.04.2004 14:29
Altair   4. const MaxN=100; var a:array[1..MaxN...   24.04.2004 14:34
Guest   спасибо за составленные задачи, просто мне тоже да...   24.04.2004 14:39
Guest   а остальные сможете решить?   24.04.2004 14:58
Александр   вот ещё задачка небольшая есть 1.В данном тексте...   24.04.2004 15:03
Altair   Сможем! Надо же какое совпадение :) --- Ит...   24.04.2004 15:37
Altair   Ну вот тогда: var s:string; c:char; i...   24.04.2004 15:58
Altair   2. задача на строки Var s,ns:string; i:b...   24.04.2004 18:49
Altair   7. const n=15; m=15; { так выглядит матрица...   24.04.2004 19:27
brut03   ;) У меня есть еще 3 не сложных задачи. ;) Во...   27.04.2004 13:45


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 21.06.2025 21:34
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"