Дан массив целых чисел А (n элементов)

@TrueStyle777 · Регистрация: 29.05.2013

Author24 — интернет-сервис помощи студентам

Дан массив целых чисел А (n элементов). Построить блок-схему алгоритма, выводящего значения элементов, для которых справедливо условие A[max] - A[i] <= n/2, где max – индекс максимального элемента массива А.

Задание звучит так,но мне нужен просто софт,а блок схему уже сам допилю.

@Matan! · 20.12.2016, 17:04

Наивный... Сначала строится блок-схема, то бишь алгоритм, а потом по нему софт пишется. Но никак не наоборот

Добавлено через 2 минуты
Вопрос номер один: массив отсортирован? Если да, то в какую сторону?

@D1973 · 21.12.2016, 08:25

Matan!, он не наивный, это политика такая... Сначала выпросить код, а потом создать новую тему: "Написал программу, помогите по ней составить блок-схему"

@AHBAR · 21.12.2016, 08:36

Сообщение от Matan!

Наивный... Сначала строится блок-схема, то бишь алгоритм, а потом по нему софт пишется. Но никак не наоборот

это теоретически, а на практике просто пишешь код, блок-схема при этом строится в голове, но прогреммист не всегда это осознает)

@AHBAR · 21.12.2016, 08:56

TrueStyle777,

Delphi

program progremist;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
VAR
a:array of integer;
i,n,max,amax:Integer;
 
begin
  { TODO -oUser -cConsole Main : Insert code here }
randomize;
n := random(11)+2; //2..12
SetLength(a,n+1);
a[1] := random(5);
amax := a[1];
max := 0;
writeln('n=',n);
writeln('a[1]=',a[1]);
for i := 1 to n do begin
    a[i] := random(5);
    writeln('a[',i,']=',a[i]);
    if a[i] > amax then begin amax := a[i]; max := i; end;
    end;
writeln;
for i := 1 to n do
    if a[max]-a[i] <= n/2 then writeln('a[',i,']=',a[i],' (a[',max,']-a[',i,']<=',(n/2):2:1,')');
readln;
 
end.

сейчас как бы не случилось 'А мне надо с конопками'

@D1973 · 21.12.2016, 12:37

Не по теме:

Ага, код получен. Ждем вопрос про блок-схему...

@Matan! · 21.12.2016, 12:52

Ну, по этой конкретной программе блок-схема будет не совсем полной: есть первый максимум - ОК.
Впрочем, это задание для ТС - используя этот код и блок-схему к нему, усовершенствовать блок-схему(алгоритм)

@TrueStyle777 · 21.12.2016, 13:41 **[ТС]**

СТОЛЬКО ТРУЛИРУЮЩИХ ПАЦАНОВ ТУТ, САМ СДЕЛАЮ БЛОКСХЕМУ.
AHBAR Cпасибо тебе большое <3

@TrueStyle777 0 / 0 / 0 Регистрация: 29.05.2013 Сообщений: 53
		1
	Дан массив целых чисел А (n элементов) 20.12.2016, 14:45. Показов 2297. Ответов 7 Метки нет (Все метки) Дан массив целых чисел А (n элементов). Построить блок-схему алгоритма, выводящего значения элементов, для которых справедливо условие A[max] - A[i] <= n/2, где max – индекс максимального элемента массива А. Задание звучит так,но мне нужен просто софт,а блок схему уже сам допилю. 0

@Matan! 1437 / 1014 / 228 Регистрация: 31.05.2013 Сообщений: 6,645 Записей в блоге: 6
	20.12.2016, 17:04	2
	Наивный... Сначала строится блок-схема, то бишь алгоритм, а потом по нему софт пишется. Но никак не наоборот Добавлено через 2 минуты Вопрос номер один: массив отсортирован? Если да, то в какую сторону? 0

@D1973 Модератор 9261 / 6039 / 2379 Регистрация: 21.01.2014 Сообщений: 25,803 Записей в блоге: 3
	21.12.2016, 08:25	3
	Matan!, он не наивный, это политика такая... Сначала выпросить код, а потом создать новую тему: "Написал программу, помогите по ней составить блок-схему" 0

@AHBAR 1077 / 488 / 316 Регистрация: 05.04.2013 Сообщений: 2,140
	21.12.2016, 08:36	4
	Сообщение от Matan! Наивный... Сначала строится блок-схема, то бишь алгоритм, а потом по нему софт пишется. Но никак не наоборот это теоретически, а на практике просто пишешь код, блок-схема при этом строится в голове, но прогреммист не всегда это осознает) 0

@D1973
	21.12.2016, 12:37 #6
	Не по теме: Ага, код получен. Ждем вопрос про блок-схему... 0

@Matan! 1437 / 1014 / 228 Регистрация: 31.05.2013 Сообщений: 6,645 Записей в блоге: 6
	21.12.2016, 12:52	7
	Ну, по этой конкретной программе блок-схема будет не совсем полной: есть первый максимум - ОК. Впрочем, это задание для ТС - используя этот код и блок-схему к нему, усовершенствовать блок-схему(алгоритм) 0

@TrueStyle777 0 / 0 / 0 Регистрация: 29.05.2013 Сообщений: 53
	21.12.2016, 13:41 [ТС]	8
	СТОЛЬКО ТРУЛИРУЮЩИХ ПАЦАНОВ ТУТ, САМ СДЕЛАЮ БЛОКСХЕМУ. AHBAR Cпасибо тебе большое <3 0

Дан массив целых чисел А (n элементов)

Решение