Алгоритмы для студентов: различия между версиями
Материал из Вики проекта PascalABC.NET
Перейти к навигацииПерейти к поиску
Mikst (обсуждение | вклад) (Новая: Здесь будет ряд алгоритмов из курса лекций "Основы программирования") |
DaZzz (обсуждение | вклад) Нет описания правки |
||
Строка 1: | Строка 1: | ||
Здесь будет ряд алгоритмов из курса лекций "Основы программирования" | Здесь будет ряд алгоритмов из курса лекций "Основы программирования" | ||
__NOTOC__ | |||
=== Вывод одномерного массива === | |||
<source lang="Delphi">procedure Print<T>(a: array of T; delim: string := ' '); | |||
begin | |||
foreach x: T in a do | |||
write(x, delim); | |||
end; | |||
// С переходом на следующую строку | |||
procedure Println<T>(a: array of T; delim: string := ' '); | |||
begin | |||
Print(a, delim); | |||
writeln; | |||
end; .</source> |
Версия от 23:15, 26 ноября 2010
Здесь будет ряд алгоритмов из курса лекций "Основы программирования"
Вывод одномерного массива
procedure Print<T>(a: array of T; delim: string := ' ');
begin
foreach x: T in a do
write(x, delim);
end;
// С переходом на следующую строку
procedure Println<T>(a: array of T; delim: string := ' ');
begin
Print(a, delim);
writeln;
end; .