Предмет: Информатика, автор: thijs

Дан одномерный массив целых чисел, состоящий из 20 ячеек, заполненный случайными числами из промежутка [-100,90]. Увеличить каждый элемент массива на 100. Напишите программу со всеми объяснениями пожалуйста!!

Ответы

Автор ответа: iowisp3
0
Написал две программки на случай, если там все таки массив  определен:
1)
var
a:array[1..20]of integer;
i,n,c:integer;
begin
 for i:=1 to 20 do
  begin
   read(a[i]);
   a[i]:=a[i]+100;
  end;
  for i:=1 to 20 do
  write(a[i],' ');
  end.


2)
var
a:array[1..20]of integer;
i,n,c:integer;
begin
  for i:=1 to 20 do
  begin
   a[i]:=random(191)-100;
   write(a[i],' ');
  end;
  writeln;
  for i:=1 to 20 do
  write(a[i]+100,' ');
end.

Автор ответа: thijs
0
http://znanija.com/task/15985962 помогите ещё с этой пожалуйста!!
Автор ответа: iowisp3
0
Так уже ж решили ее
Автор ответа: thijs
0
Там не на паскале , плюс там ошибка!
Похожие вопросы
Предмет: Қазақ тiлi, автор: narminakakharmanova4
Предмет: Математика, автор: Аноним
Предмет: Математика, автор: Аноним