Паскаль для школьников

Автор: Ушаков Д. М., Юркова Т. А.
Языки: Русский
Издательство: Питер
Год: 2010
ISBN: 978-5-469-00492-9
Страниц: 256
Описание: Эта книга — не учебник, а скорее помощник в освоении языка программирования Паскаль, с которым на уроках информатики знакомятся все школьники. Она состоит из бесед, посвященных практическим вопросам программирования и решения задач. Многочисленные примеры позволяют лучше понять, как разработать алгоритм, написать собственную программу, правильно оформить её текст. Советы и примечания обращают внимание читателей на важные детали, позволяют избежать подводных камней, более эффективно писать программы.
Книга написана школьными преподавателями информатики, имеющими большой опыт многолетней практической работы.
 

Free Pascal и Lazarus: Учебник по программированию

Автор: Алексеев Е. Р., Чеснокова О. В., Кучер Т. В
Языки: Русский
Издательство: ДМК-пресс
Год: 2010
Серия: Библиотека ALT Linux
ISBN: —
Страниц: 442
Описание: Авторы книги давно хотели написать учебник по программированию, который был бы полезен пользователям различных операционных систем. Благодаря компании ALT Linux, мы попытались это сделать. В качестве языка программирования был выбран язык Free Pascal, который представляется нам ясным, логичным и гибким языком и приучает к хорошему стилю программирования. Свободно распространяемые компиляторы языка Free Pascal реализованы во многих дистрибутивах Linux, есть свободные компиляторы и для ОС Windows. Кроме того, в этой книге мы попытались познакомить читателя с принципами создания визуальных приложений в среде Lazarus. В настоящее время существует множество подходов к изучению программирования. По мнению авторов, нельзя изучать программирование на каком-либо языке, не изучив методы разработки алгоритмов. Одним из наиболее наглядных методов составления алгоритмов является язык блок-схем. Об этом свидетельствует и многолетний опыт авторов преподавания программирования. Мы попытались написать учебник по алгоритмизации и программированию, насколько нам это удалось — судить читателю.
Авторы надеются, что читатель имеет первоначальные навыки работы на персональном компьютере под управлением ОС Linux или Windows и знаком со школьным курсом математики.

Turbo Pascal. Самоучитель

Автор: О. А. Меженный
Языки: Русский
Издательство: Вильямс, Диалектика
Год: 2008
Серия: Самоучитель
ISBN: 978-5-8459-1330-2
Страниц: 336
Описание: Назначение этой книги — научить неподготовленного читателя создавать программы на Turbo Pascal. В то же время она также вполне может использоваться студентами и учащимися в качестве учебника. Главы книги содержат информацию об основных аспектах программирования на языке Turbo Pascal, таких как типы данных, операторы, файлы, подпрограммы, указатели, динамическая память, модули и объектно-ориентированное программирование. В конце книги имеется несколько приложений, в которых содержатся вспомогательные материалы справочного характера.
 

В массиве разделить все четные элементы на 2

Задача: В массиве разделить все четные элементы на 2.

Листинг(исходник) программы:


	Uses crt;
	Const n=10;
	Var F : array[1..n] of real;
	i : integer;
	Begin
	clrscr;
	randomize;
	textcolor(7);
	writeln(\'Array F :\');
	
	for i:=1 to n do
	begin
	F[i]:=random(10)-4;
	if (i mod 2)=0 then
	begin
	textcolor(2);
	F[i]:=F[i]/2;
	write(F[i]:4:1, \' \');
	end
	else
	begin
	textcolor(7);
	write(F[i]:4:1,\' \');
	end;
	end;
	readkey;
	End.
	

Заменить элементы с нечетными номерами на квадрат их номера

Задача: Заменить элементы с нечетными номерами на квадрат их номера.

Листинг(исходник) программы:


	Uses crt;
	Const n=10;
	Var F : array[1..n] of integer;
	i : integer;
	Begin
	clrscr;
	randomize;
	textcolor(7);
	writeln(\'Array F :\');
	for i:=1 to n do begin
	F[i]:=random(10)-4;
	end;
	
	for i:=1 to n do begin
	if not((i mod 2)=0) then begin
	textcolor(14);
	F[i]:=i*i;
	write(F[i]:4);
	end
	else begin
	textcolor(7);
	write(F[i]:4);
	end;
	end;
	readkey;
	End.