26751:线性链表的建立及逆序输出 分数: 100

原创 2015年07月10日 09:45:27
题目描述

输入一个正整数序列,遇负数时停止,建立一个线性链表存储读入的数据,将各个元素按逆序输出。


输入格式


输出


样例输入

1 2 3 4 5 -1


样例输出

5 4 3 2 1

program 26751;
type point=^node;
    node=record
       date:integer;
       next:point;
    end;
var head,p:point;i:integer;
begin
 head:=nil;
 read(i);
 while i<>-1 do
  begin
   new(p);
    p^.date:=i;
    p^.next:=head;
    head:=p;
    read(i);
   end;
  while p<>nil do
   begin
    write(p^.date,' ');
    p:=p^.next;
   end;
  writeln;
  readln;
end.


program 26751;
type point=^node;
   node=record
    date:integer;
    next:point;
   end;
 var  p,q,head:point;x:integer;
 procedure shuchu(a:point);
 begin
  if(a^.next<>nil)then shuchu(a^.next);
   write(a^.date,' ');
 end;
begin
 head:=nil;
 read(x);
 while x>=0 do
  begin
   if head=nil then
   begin
    new(p);p^.date:=x;q:=p;head:=p;
   end
  else
   begin
    new(p);p^.date:=x;p^.next:=nil;q^.next:=p;q:=p;
   end;
   read(x);
  end;
  p:=head;
  shuchu(p);
 writeln;
end.
版权声明:本文为博主原创文章,未经博主允许不得转载。

相关文章推荐

线性链表的建立、查找与删除

  • 2013年07月06日 13:55
  • 1KB
  • 下载

C语言基本数据结构之一(线性链表的增,删,改,查及倒序)

这学期刚好学了计算机软件基础,便顺带把C的基本数据结构过一遍,在期末的时候抽空整理了一下知识点,以免以后忘记了,如有错误,希望大家能帮忙改正我有点懒,就直接上代码,里面注释也相对详细#include ...

线性链表的建立与显示

  • 2013年05月26日 18:43
  • 43KB
  • 下载

线性链表 链式存储 操作代码

  • 2012年03月22日 19:28
  • 5KB
  • 下载

【二叉树->链表】二叉树结构转双向线性链表结构(先序遍历)

二叉树存储结构属于

数据结构线性链表

  • 2007年07月15日 17:40
  • 402KB
  • 下载

线性链表的实现

  • 2017年03月06日 22:04
  • 2KB
  • 下载

c实现对给定线性链表head按节点值非递减次序输出所有节点,并把刚输出的节点从链表中删除

问题描述:对给定线性链表head按节点值非递减次序输出所有节点,并把刚输出的节点从链表中删除 思路:给定的链表不知道带头结点还是不带头结点。分情况讨论。 1 带头结点的单链表 #inclu...

线性链表的实现

  • 2012年10月18日 14:03
  • 64KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:26751:线性链表的建立及逆序输出 分数: 100
举报原因:
原因补充:

(最多只允许输入30个字)