爱问知识人 爱问教育 医院库

用pascal编写数组分量数据移动的程序

首页

用pascal编写数组分量数据移动的程序

读入100个数组分量的数组,把第1个分量的值赋值给第2个,第2个的给第3个,最后,第100个的给第1个,输出新赋值后的数组。

提交回答
好评回答
  • 2018-04-08 05:19:50
    这个题还就我会来回答你,数据什么类型没说,当实型来做:
    type
    x=array[1..100]of real;
    var
    i,j:integer;
    y:x;
    begin
    for i:=1 to 100 do
    read(x[i]);
    j:=x[100];
    for i:=99 downto 1 do
    x[i+1]:=x[i];
    x[1]:=j;
    for i:=1 to 100 do
    write(x[i]);
    end.

    s***

    2018-04-08 05:19:50

类似问题

换一换

相关推荐

正在加载...
最新问答 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):