Пример в Excel 2003
Ярлычки листов соответствуют № задания
Var
i, min, a, n: integer;
begin
min := trunc(power(2, 31) - 1);
readln(n);
for i := 1 to n do
begin
readln(a);
if (a < min) then
min := a;
end;
writeln(min);
end.
"L1" - Название файла
".TXT" - расширение файла (создан в блокноте, текстовый формат)
"1 КБ" - объем файла
"<span>02.03.2007.18:00</span>" - Дата создания документа.
Мы течём по проводам
Мы течём в розетке
220 вольт это не конфетки!
<span>moveForward();
turnLeft();
moveForward();
turnRight();
moveForward<span>(); 2-й уровень
</span></span>