Вычисление суммы N чисел: использование новых возможностей - История изменений

Mikst в 07:42, 27 ноября 2010

2010-11-27T07:42:35Z

2010-01-12T10:23:30Z

Ссылки

← Предыдущая версия		Версия от 13:23, 12 января 2010
Строка 21:		Строка 21:
	Следует обратить внимание, что описание переменной x внутри блока в цикле не приводит к потере производительности программы или повторному выделению памяти. Память под внутриблочную переменную выделяется один раз при входе в основную программу.		Следует обратить внимание, что описание переменной x внутри блока в цикле не приводит к потере производительности программы или повторному выделению памяти. Память под внутриблочную переменную выделяется один раз при входе в основную программу.
	== Ссылки ==		== Ссылки ==
	[[Особенности языка: базовый уровень]]		*[[Особенности языка: базовый уровень]]
			*[http://pascalabc.net/ru/bazovyie-osobennosti-yazyika-i-bibliotek.html Сайт PascalABC.NET: Особенности языка]

2010-01-09T14:05:03Z

← Предыдущая версия		Версия от 17:05, 9 января 2010
Строка 1:		Строка 1:
			В этом примере продемонстрировано использование оператора +=, внутриблочных описаний переменных, автоопределения типа и описания переменной в заголовке цикла for для поиска суммы N введенных чисел
	<source lang="Delphi">var		<source lang="Delphi">var
	N: integer;		N: integer;
Строка 17:		Строка 18:
	writeln('Сумма введенных чисел = ',sum);		writeln('Сумма введенных чисел = ',sum);
	end.</source>		end.</source>

			Следует обратить внимание, что описание переменной x внутри блока в цикле не приводит к потере производительности программы или повторному выделению памяти. Память под внутриблочную переменную выделяется один раз при входе в основную программу.
	== Ссылки ==		== Ссылки ==
	[[Особенности языка: базовый уровень]]		[[Особенности языка: базовый уровень]]

2010-01-09T14:00:54Z

← Предыдущая версия		Версия от 17:00, 9 января 2010
Строка 1:		Строка 1:
			<source lang="Delphi">var
			N: integer;
			sum: real;

			begin
			write('Введите количество чисел: ');
			readln(N);

			write('Введите числа: ');
			sum := 0;
			for var i := 1 to N do
			begin
			var x: real;
			read(x);
			sum += x;
			end;
			writeln('Сумма введенных чисел = ',sum);
			end.</source>
	== Ссылки ==		== Ссылки ==
	[[Особенности языка: базовый уровень]]		[[Особенности языка: базовый уровень]]

2010-01-09T13:11:12Z

Новая страница

== Ссылки ==
[[Особенности языка: базовый уровень]]