Вопрос по информатике:
Преобразовать одномерный массив элементы с третьего по восьмой разделить на последний элемент.
- 18.08.2017 03:29
- Информатика
- remove_red_eye 15396
- thumb_up 25
Ответы и объяснения 1
Var i,r:integer;
a:array[1..10] of real;
s:real;
BEGIN
Write('r:');
readln(r);
for i:=1 to r do begin
a[i]:= random(20);
write(a[i]:5:1);
end;
Writeln();
for i:=1 to r do begin
if (i>=3) and (i<=8) then a[i]:=a[i]/a[r];
Write(a[i]:5:1);
end;
Readln();
END.
- 19.08.2017 02:31
- thumb_up 3
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.