Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ «Основы алгоритмизации и программирования»

Автор: Happy User!!! 2.12.2006 19:18

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

 ! 
 DOC удален: http://forum.pascal.net.ru/rules.html ... Присоедини файл, разрешенный правилами.
volvo


Автор: Michael_Rybak 2.12.2006 20:01

А правила - для матерых постеров. doc файлы нельзя.

Автор: Happy User!!! 2.12.2006 21:41

Извените....правила не читал сижу через 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.



Автор: мисс_граффити 2.12.2006 22:14

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

Автор: Happy User!!! 2.12.2006 22:34

ну хоть кто-нить.....помогите...если так легко.....=)