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

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

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

 
 Ответить  Открыть новую тему 
> «Основы алгоритмизации и программирования», Домашняя работа
Happy User!!!
сообщение 2.12.2006 15:18
Сообщение #1


Новичок
*

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

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


Это для матерых программистов.....14 вариант.....блок-схемы ненадо....сам сделаю.....smile.gif

 ! 
DOC удален: Правила Форума, 1.11 ... Присоедини файл, разрешенный правилами.
volvo

 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Michael_Rybak
сообщение 2.12.2006 16:01
Сообщение #2


Michael_Rybak
*****

Группа: Модераторы
Сообщений: 1 046
Пол: Мужской
Реальное имя: Michael_Rybak

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


А правила - для матерых постеров. doc файлы нельзя.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Happy User!!!
сообщение 2.12.2006 17:41
Сообщение #3


Новичок
*

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

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


Извените....правила не читал сижу через GPRS (т.е. от мобильного по трафику) теперь буду знать.....

ИСПРАВЛЯЮСЬ!!!!
Задание 1
Найти ошибки в следующей программе.
Напишите исправленный вариант!!! =)
a) {две ошибки}
var a = array[1..20] of integer;
i, b, c: integer;
begin
- - - - - - -;
c := a[1] + b[1];
- - - - - - - -;
end.

b) {две ошибки}
type Mas: array[1..30] of real;
var i : integer;
begin
- - - - - - -;
writeln (a[i]);
- - - - - - - -;
end.

с) {две ошибки}
var a: Mas;
type Mas = array[1..20] of integer;
begin
- - - - - - -;
readln(a1);
- - - - - - - -;
end.

d) {две ошибки}
var a: array[1..n] of integer;
begin
c := a[1] ;
writeln(a);
- - - - - - - -;
end.


f) { найти 2 ошибки}
const n=5;
var a: array[1..n,1..n] of integer;
begin
- - - - - - - -;
writeln(‘первый эл-т =’, a[1]);
writeln(‘последний эл-т = ’, a[n]);
end.

e) { найти 2 ошибки}
var a: array[1..5,1..3] of integer;
begin
- - - - - - - -;
writeln(a[2,3],’ ‘,a[6,2] );
writeln(‘1-й элемент=’, a);
end.


 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
мисс_граффити
сообщение 2.12.2006 18:14
Сообщение #4


просто человек
******

Группа: Модераторы
Сообщений: 3 641
Пол: Женский
Реальное имя: Юлия

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


берешь любой учебник по паскалю, открываешь первую главу и читаешь, как надо объявлять типы, как переменные.
потом - как работать с массивами.
ошибки очевидные, на уровне базовых знаний теории.


--------------------
Все содержимое данного сообщения (кроме цитат) является моим личным скромным мнением и на статус истины в высшей инстанции не претендует.
На вопросы по программированию, физике, математике и т.д. в аське и личке не отвечаю. Даже "один-единственный раз" в виде исключения!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Happy User!!!
сообщение 2.12.2006 18:34
Сообщение #5


Новичок
*

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

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


ну хоть кто-нить.....помогите...если так легко.....=)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

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

 



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