Входные, выходные данные. (Требуется определить)

23.12.2012, 14:11. Показов 2589. Ответов 0

Метки нет (Все метки)

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

Помогите определить, какие входные, а какие выходные данные для этой программы.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
program abc;
uses crt;
var i,k,m,n:integer;
      a:array[1..100] of real;
min,d,f:real;  c:char ;
begin
repeat
write('введите n<=25:');
readln (n);
if (n<0) or (n>25)then
writeln ('n введено не из диапазона!');
until (n>0) and(n<=25);
f:=1;
for i:=1 to n do
begin
f:=f*(i);
a[i]:= f*sin(i+2);
end;
repeat
writeln('Получен массив');
for i:=1 to n do
writeln('a[',i:2,']=',a[i]:6:3);
writeln('нажмите Enter!');
readln;
min:=a[2];
   k:=2;
for i:=3 to n do
     if i mod 2=0 then
          if a[i]< min then
             begin
               min:=a[i];
                 k:=i;
             end;
 
   writeln('min=',a[k]:6:3);
   writeln(' k=',k:6);
    for i:=1 to n-1 do
   for k:=1 to n-i do
   if a [k]>a[k+1] then
   begin
   d:=a[k];
   a[k]:=a[k+1];
   a[k+1]:=d;
   end;
 
 
   writeln('Получен масив после упорядочивания');
   for i:=1 to n do
   writeln('a[',i:2,']=',a[i]:6:3);
   
   writeln('Программа выполнена!');
   writeln('Повторить?(Y/N)');
   readln(c);
   until (c='n') and(c='N');
   end.

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

23.12.2012, 14:11

Ответы с готовыми решениями:

Входные и выходные файлы
Вводится последовательность чисел до тех, пока не будет введено два равных числа подряд. Посчитать количество чисел в...

Входные и выходные данные
Подскажите, что является входными и выходными данными в следующих 4 работах. Лабораторная работа №1 Для матрицы А (N строк, M...

Входные и выходные данные!
Сегодня лектор помог написать программу но по прибытию домой стал разбиратся и ничего не понял.Прошу вас обьяснить мне что такое y,j,i,s я...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

23.12.2012, 14:11

Помогаю со студенческими работами здесь

Входные и выходные данные
var name: text; n,number,s1,s2,i,j,poryadok,id:longint; nik:array of string; game,win:array of longint; ...

Входные и выходные данные
Помогите пожалуйста решить задачу, очень прошу, я в Паскале плохо разбираюсь((((( Требуется найти самую длинную непрерывную цепочку...

Що означает входные и выходные данные
Всем Привет! Вот пишу курсовую!Есть одна проблемка: У меня есть содержание, по котором я пишу курсовую. (Название курсовой Базад Данных...

Исходные, входные и выходные данные
Друзья мне нужна Ваша помощь,почему у меня неувязки в исходных,входных и выходных данных? Вроде бы все правильно писала, а преподаватель...

Входные и выходные данные на сайте
Доброго времени суток всем. Я делаю интернет-магазин(дипломная работа). При написании пояснительной записки встал вопрос: что писать во...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	Контроль уникальности заводского номера - вариант №2 Maks 24.03.2026 В отличие от предыдущего варианта добавлено прерывание циклов, также добавлены новые переменные для сохранения контекста ошибки перед прерыванием цикла: Процедура ПередЗаписью(Отказ, РежимЗаписи,. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip	Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .
Модель здравоСохранения: работники работают быстрее после её введения. anaschu 23.03.2026 geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .	Контроль уникальности заводского номера - вариант №1 Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью. Данные берутся из регистра сведений, по которому настроено. . .	Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .

Наверх