Program pribav;const n=5;type mas=array[1..n] of integer;var a,b : mas; i : integer;begin write('ââåäèòå ìàññèâ'); for i:=1 to n do readln(a[i]); writeln('èñõîäíûé ìàññèâ:'); for i:=1 to n do writeln(a[i]); for i:=1 to n do b[i]:=a[i]+25; writeln('íîâûé ìàññèâ:'); for i:=1 to n do writeln(b[i]);end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
