Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 20.05.2012, 12:32   #1
Nikita1100
 
Регистрация: 18.05.2012
Сообщений: 6
По умолчанию Pascal, нужна блок схема (есть готовая задача)

var
a:array[1..1000] of real;
max:real;
i,n:integer;
begin
writeln('vvedite n');
readln(n);
writeln('vvedite ',2*n,' elementov massiva');
for i:=1 to 2*n do read(a[i]);
max:=a[1]+a[2*n];
for i:=1 to n do
if a[i]+a[2*n-i+1]>max then max:=a[i]+a[2*n-i+1];
writeln('max=',max:0:6);
readln;
end.

Нужна блок-схема. Помогите пожалуйста.
Nikita1100 вне форума Ответить с цитированием
Старый 20.05.2012, 12:40   #2
Vlt
Пользователь
 
Регистрация: 18.05.2012
Сообщений: 27
По умолчанию схема

Цитата:
Сообщение от Nikita1100 Посмотреть сообщение
var
a:array[1..1000] of real;
max:real;
i,n:integer;
begin
writeln('vvedite n');
readln(n);
writeln('vvedite ',2*n,' elementov massiva');
for i:=1 to 2*n do read(a[i]);
max:=a[1]+a[2*n];
for i:=1 to n do
if a[i]+a[2*n-i+1]>max then max:=a[i]+a[2*n-i+1];
writeln('max=',max:0:6);
readln;
end.

Нужна блок-схема. Помогите пожалуйста.

вот Ваша схема
Изображения
Тип файла: gif sx.gif (6.2 Кб, 95 просмотров)
Vlt вне форума Ответить с цитированием
Старый 20.05.2012, 12:41   #3
Nikita1100
 
Регистрация: 18.05.2012
Сообщений: 6
По умолчанию

Ох, спасибо!
Nikita1100 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Нужна блок-схема Ragnaros Помощь студентам 5 25.01.2012 22:25
Нужна блок схема... misha0711 Помощь студентам 1 13.04.2011 12:50
нужна блок схема CheyZe Общие вопросы C/C++ 4 03.02.2011 18:58
Нужна блок схема Денис999 Помощь студентам 0 24.12.2010 19:28