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

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

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

> Массивы. Помогите решить
сообщение
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 51
Пол: Мужской
Реальное имя: Аблай

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


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

Дан массив А[5,5]. Построить массив B(5) по следующему правилу: B(I) присвоить 1 если в I-той строкемассива есть хотя бы один отрицательный элемент, в про8тивном случае B(I) присвоить 0.

2.Если у массива А(20) есть элемент равный квадрату последнего элемента то все элементы, следующие за ним, возвести в квадрат, иначе вывести массив без изменений.


Заране спасибо))
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Credo   Массивы. Помогите решить   17.10.2010 14:57
Lapp   Заране спасибо))За что спасибо? Заранее не приним…   17.10.2010 16:25
Credo   А Вот вариант второй задачи var a:array [1..20]…   18.10.2010 23:13
TarasBer   А если ReadLn в конце дописать?   18.10.2010 23:14
Credo   все равно не получается(( :wink:   18.10.2010 23:15
TarasBer   То есть, не в самом конце, а сразу перед последним…   18.10.2010 23:30
Credo   ну я понел не получается(   18.10.2010 23:36
TarasBer   Свет в доме есть? (не хочешь таких вопросов - гов…   18.10.2010 23:47
Credo   Выводит всё без ошибок, ввожу числа бесконечно и р…   18.10.2010 23:57
Lapp   Выводит всё без ошибок, ввожу числа бесконечно и р…   19.10.2010 0:06
TarasBer   > Выводит всё без ошибок > ввожу числа беско…   19.10.2010 0:00
Credo   Так ктрл+ф9 ввожу числа, и потом хочу получить рез…   19.10.2010 0:05
Lapp   Так ктрл+ф9 ввожу числа, и потом хочу получить рез…   19.10.2010 0:13
Credo   Входные и выходные данные   19.10.2010 0:07
Credo   Хмм спасибо понел что то :)   19.10.2010 0:24
Credo   А можно блок схему :) не понимаю эту блок схем((   19.10.2010 1:43


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

 





- Текстовая версия 4.05.2024 16:46
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name