Поместить цифру 0 на первую... - вопрос №668114

Поместить цифру 0 на первую позицию вектора, состоящего из чисел 5 3 7 8 без использования другого вектора

Лучший ответ по мнению автора

program vector;

uses crt;

var a:array[1..5] of integer;

i:integer;

begin

clrscr;

writeln('vvedite 4 znachenia 5 3 7 8 libo drugie');

for i:=1 to 4 do readln(a[i]);

for i:= 4 downto 1 do a[i+1]:=a[i];

a[1]:=0;

for i:=1 to 5 do write(a[i]:8); 

readln  

end. 

Буду благодарна, если отметите 

22.06.13
Лучший ответ по мнению автора

Еva

от 100 p.
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store