Решение задач

@Александра_85 · Регистрация: 02.03.2016

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

Всем здравствуйте. Буду благодарна за любую помощь. У меня уже психоз скоро начнется. Вообще я учусь по специальности "Финансы и Кредит", но поскольку ВУЗ специфический, надо же было что-то воткнуть. В обще задали контрольную по языку программирования - паскаль. А я в этом ни черта не понимаю. Бились месяц всей семьей над задачами. В приложении контрольная. Преподаватель все завернул и написал рецензию и что все не правильно.

Вот рецензия:
Задание 1
Вы как-то слишком вольно обращаетесь с блоками в блок-схемах. Каждый блок имеет свое назначение. Поэтому необходимо использовать для каждого типа команд соответствующий им блок. Вывод данных – параллелограмм, линейная операция – прямоугольник и т.д. Исправить.
Зачем в условии используется операция Not? Без неё разве нельзя?
Задание 2
Странное какое-то решение. Зачем говорить о массивах, если в программе они не используются? Зато в алгоритме (сужу по программе) много непонятных команд. И совсем не помешает рассказать, откуда они взялись.
Это не блок-схема алгоритма. Алгоритм не может содержать непонятные команды, тупики, неопределенные переходы и т.д.
Разработанный алгоритм необходимо записать на языке программирования три раза, каждый раз используя различные виды циклов. А затем сравнить циклы и ответить на вопрос. Эта часть задания не выполнена.
Задание 3
Задача решена неправильно. Точнее сказать, Вы решаете совсем другую задачу.
Размер файл величина переменная N, поэтому должна задаваться с клавиатуры. Результатом работы программы должны являться два массива B и C.

Помогите, пожалуйста. Разъясните пошагово- что не так. Ну не понимаю я что он пишет. Мне папа помогал решать, но и он уже не понимает, что не так. Очень прошу помогите и так, чтобы человек понял, который с паскалем до этого не имел дело

Всем заранее спасибо.

@Александра_85 · 02.03.2016, 12:24 **[ТС]**

А вы слова пишете в скобках в коде: их надо оставлять или удалять в программе?

ФедосеевПавел · 02.03.2016, 12:26

Повторюсь

Сообщение от ФедосеевПавел

Я подозреваю, что различные циклы должны использоваться применительно к циклу перебора A. А всё остальное - как повезёт.

Тот цикл while используется для вычисления суммы цифр числа. Поэтому, его реализую произвольным образом. Можно и как у вас - перевод в строку с последующим извлечением символов.

@Александра_85 · 02.03.2016, 12:26 **[ТС]**

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

ФедосеевПавел · 02.03.2016, 12:34

Комментарии - оставить или удалить - на ваше усмотрение. Смотрите, я не оформлял программы строками с указанием автора, группы, номера задания - сделаете это самостоятельно. И попробуйте откомпилировать и запустить - вижу у вас FreePascal.

Добавлено через 3 минуты
Repeat

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
program Summa;
 
var
  n, k:  integer;
  A, Amax, temp: longint;
  Count: longint;
  Sum, i: integer;
begin
  readln(n, k);
 
  {решение при помощи цикла repeat}
  Amax := 1;
  for i := 1 to n do
    Amax := Amax * 10;
  Amax := Amax - 1;
  Count := 0;
  {перебор чисел}
  A := 0;
  repeat
    {вычисление суммы цифр текущего числа}
    Temp := A;
    Sum  := 0;
    while Temp <> 0 do
    begin
      Sum  := Sum + (Temp mod 10);
      Temp := Temp div 10;
    end;
    {если число подходит, то увеличиваем счётчик чисел}
    if Sum = k then
      Count := Count + 1;
    A := A + 1;
  until (A > Amax);
  writeln(Count);
end.

@Александра_85 · 02.03.2016, 12:36 **[ТС]**

Да, такой паскаль. Какой написали в задании использовать, такой и использую. Цикл фор проверила - работает. Спасибо и на том. Не надо ничего писать там.

Добавлено через 1 минуту
А по блок-схемам - чем они буду отличаться? делать по аналогии с For?

Добавлено через 20 секунд
С третьей , последней, задачкой поможете?

ФедосеевПавел · 02.03.2016, 12:51

for идентичен while.
repeat - проверка условия A<=Amax будет не перед телом цикла, а в конце.

@Александра_85 · 02.03.2016, 13:02 **[ТС]**

И вот последняя задача:
Задан целочисленный массив А размерностью N. Необходимо создать для массива В и С, при этом массив В содержит все четные числа из массива А, а массив С – все нечетные числа ( в том же порядке).

Решение:
Задаем целочисленный массив А размерность от 0 до 9, т.е. количество 10. Массив заполняем 10 случайными числами от 0 до 99 четными и нечетными.

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
Program Massiv ;
    uses crt;
Const
    N = 9;
Var
    A:Array[0..N] Of Integer;
    i,k:Integer;
Begin
    clrscr;
    Write('Mironova A.C. variant 17.3 repeat');
    WriteLn;
    k:=0;
    Randomize;
    {Заполняем случайно массив}
    For i:=0 To N Do
Begin
 A[i]:=Random(99)+1;{числа в 1..99}
 Write(A[i],' ');
 End;
 Writeln('A massiv');
 WriteLn;
 i:=0;
 Writeln('B massiv');
 while i<=N do
begin
 {Выводит сначала четные числа}
 If  A[i] Mod 2=0 Then
 Write(A[i],' ');
 i:=i+1;
end;
 Writeln('chet ');
 WriteLn;
 i:=0;
 Writeln('С massiv');
repeat
 {Выводит нечетные числа}
 If A[i] Mod 2<>0 Then
 Write(A[i],' ');
 i:=i+1;
 until i>N;
 Writeln('nechet ');
 Readln;
End.

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

Вот что пишет:
Массивы нужно создать!!! В Вашей программе только одиин массив А. И на экран выводятся числа именно из этого массива.
переменная - суть изменяемая. т.е. может принимать различные значения. Поэтому и обозначили буквой N. Если бы массив был фиксированной длины, так и сказано было бы - создать массив размерностью 10, например.
Теперь вопрос: откуда тогда брать значение для N? Вот тут и возникает множества вариантов. Я предложил самый легкий - с клавиатуры. Можно хранить это значение в специальном файле. Можно получать по сети откуда-нибудь и т.д. Выбирайте любой способ. Но! Первый шаг - это определение размерности массива. А уже потом идет заполнение и его обработка.
Посмотрите в описание переменных. Сколько переменных типа массив там описано? - одна. А должно быть три!!! Первый массив заполняете случайным образом. А вот второй и третий по правилам, которые описаны в задании.

ФедосеевПавел · 02.03.2016, 13:07

del

Добавлено через 3 минуты
Вы изучали динамические массивы?

@Александра_85 · 02.03.2016, 13:11 **[ТС]**

Одномерные и двумерные массивы. Как могла, пыталась понять. За месяц до начала сессии задание выслали на выполнение(
Динамические массивы - такого нет в методическом пособии

ФедосеевПавел · 02.03.2016, 13:14

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
program Massiv;
 
const
  Nmax = 100;
var
  N: integer;
  A, B, C: array [0..Nmax] of integer;
  i: integer;
  LenB, LenC: integer;
begin
  Write('Mironova A.C. variant 17.3');
  WriteLn;
  Randomize;
 
  Write('Vvedite N: ');
  readln(N);
 
  {Заполняем случайно массив}
  Writeln('A massiv');
  for i := 0 to N - 1 do
  begin
    A[i] := Random(99) + 1;{числа в 1..99}
    Write(A[i], ' ');
  end;
  WriteLn;
  {формирование массивов B и C}
  LenB := 0;
  LenC := 0;
  for i := 0 to N - 1 do
    if odd(A[i]) then
    begin
      C[LenC] := A[i];
      LenC := LenC + 1;
    end
    else
    begin
      B[LenB] := A[i];
      LenB := LenB + 1;
    end;
  Writeln('B massiv');
  for i := 0 to LenB - 1 do
    Write(B[i], ' ');
  writeln;
  Writeln('C massiv');
  for i := 0 to LenC - 1 do
    Write(C[i], ' ');
end.

@Александра_85 · 02.03.2016, 13:17 **[ТС]**

А почему N = 100?

ФедосеевПавел · 02.03.2016, 13:22

Не N, а Nmax. В теории, можно ввести N, а затем выделить в памяти место под N чисел (даже на 1Гбайт и более). Но вы не изучали такой возможности (динамические массивы). Поэтому придумываем какое-то ограничение (например, 100), на каждый массив выделяем памяти по 100 элементов, хотя используем гораздо меньше (к примеру 10).

@Александра_85 · 02.03.2016, 13:27 **[ТС]**

А при проверке программы N вводить любое?

Добавлено через 43 секунды
И еще последняя просьба - можете блок-схему показать, как она будет выглядеть в к этой задаче?

ФедосеевПавел · 02.03.2016, 13:29

N<=Nmax

@Александра_85 · 02.03.2016, 13:40 **[ТС]**

Павел, еще раз вам огромное спасибо. Прямо большущее. Вы хороший человек) в беде не бросили.
Павел, а можно будет к вам обратиться, когда вы будете на форуме. Я сначала сама экзамен попробую прорешать, если не смогу сдать, там три попытки - можно будет у вас спрашивать. Экзамен тестовый с вариантами ответов. Задач много. Я могу к вам обратиться?

ФедосеевПавел · 02.03.2016, 13:49

Попытка - не пытка.
Но это сегодня я дома. На днях получу комплект документов и буду работать на объектах вдали от интернета.
Может кто другой поможет. И ещё есть раздел фриланса - там за деньги оказывают подобную помощь. Цены - правда не знаю.

ФедосеевПавел · 02.03.2016, 14:10

Пробовал набрать блок-схему к 3 - но уже устал. Существуют программы для автоматического создания блок-схем по готовому коду. Я ими не пользуюсь, но на форуме наткнулся http://www.fatesoft.com/s2f/.

Приложу рисунок, но в нём нет заполнения массива А. Это нужно доделать.

@Александра_85 · 18.03.2016, 07:02 **[ТС]**

Добрый день. По второй задаче вот что ответил преподаватель:

Где решение задачи? Оно должно быть обязательно. Я должен понимать, каким образом Вы получили алгоритм решения задачи.
Необходимо решить задачу и разработать один(!!!) алгоритм её решения. Один, а не три. Затем этот алгоритм нужно записать на языке Паскаль, но в качестве цикла использовать только один из трех циклов. Затем записать алгоритм ещё раз и снова на языке Паскаль, но выбрать уже другой цикл. Откройте пример оформления контрольной работы в учебно-методическом пособии. Там же все показано. Что и как делать.
В блок-схеме один цикл, в программе их три. Откуда взялись программы интересно знать? Кстати, почему в каждой из этих программ я вижу разные типы циклов? Должен быть только один! Один тип цикла – для одной программы? Если используется for, например, то не должно быть циклов while и repeat.
Привести решение, правильный алгоритм с комментариями, описание структуры программ, сами программы и ответ на вопрос.

ФедосеевПавел · 18.03.2016, 11:54

А что вы дали в ответе на задачу?
И как в методичке на блок-схеме обозначается for - вытянутым 6-угольником?
А что такое "правильный алгоритм с комментариями" - три блок-схемы или словесное описание? Что об этом в методичке?
Вы, наверное, не написали

Сообщение от Александра_85

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

Что тут сказать - преподаватель дотошный, старайтесь быть внимательнее.
--------------------------------------
Привести циклы к однообразию несложно, как и показать их на блок-схеме.
for

Кликните здесь для просмотра всего текста

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
program Summa;
 
var
  n, k:  integer;
  A, Amax, temp: longint;
  Count: longint;
  Sum, i: integer;
begin
  readln(n, k);
 
  {решение при помощи цикла for}
  Amax := 1;
  for i := 1 to n do
    Amax := Amax * 10;
  Amax := Amax - 1;
  Count := 0;
  {перебор чисел}
  for A := 0 to Amax do
  begin
    {вычисление суммы цифр текущего числа}
    Temp := A;
    Sum  := 0;
    for i:=1 to n do
    begin
      Sum  := Sum + (Temp mod 10);
      Temp := Temp div 10;
    end;
    {если число подходит, то увеличиваем счётчик чисел}
    if Sum = k then
      Count := Count + 1;
  end;
  writeln(Count);
end.

while

Кликните здесь для просмотра всего текста

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
program Summa;
 
var
  n, k:  integer;
  A, Amax, temp: longint;
  Count: longint;
  Sum, i: integer;
begin
  readln(n, k);
 
  {решение при помощи цикла while}
  Amax := 1;
  i := 1;
  while i <= n do
  begin
    Amax := Amax * 10;
    Inc(i);
  end;
  Amax  := Amax - 1;
  Count := 0;
  {перебор чисел}
  A := 0;
  while A <= Amax do
  begin
    {вычисление суммы цифр текущего числа}
    Temp := A;
    Sum  := 0;
    while Temp <> 0 do
    begin
      Sum  := Sum + (Temp mod 10);
      Temp := Temp div 10;
    end;
    {если число подходит, то увеличиваем счётчик чисел}
    if Sum = k then
      Count := Count + 1;
    Inc(A);
  end;
  writeln(Count);
end.

repeat-until

Кликните здесь для просмотра всего текста

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
program Summa;
 
var
  n, k:  integer;
  A, Amax, temp: longint;
  Count: longint;
  Sum, i: integer;
begin
  readln(n, k);
 
  {решение при помощи цикла while}
  Amax := 1;
  i := 1;
  repeat
    Amax := Amax * 10;
    Inc(i);
  until i > n;
  Amax := Amax - 1;
  Count := 0;
  {перебор чисел}
  A := 0;
  repeat
    {вычисление суммы цифр текущего числа}
    Temp := A;
    Sum  := 0;
    repeat
      Sum  := Sum + (Temp mod 10);
      Temp := Temp div 10;
    until Temp = 0;
    {если число подходит, то увеличиваем счётчик чисел}
    if Sum = k then
      Count := Count + 1;
    A := A + 1;
  until (A > Amax);
  writeln(Count);
end.

В выводах напишите что-нибудь такое:
При решении данной задачи используются три цикла - вычисление максимального исследуемого числа (Amax), цикл перебора всех чисел от 0 до максимального исследуемого (Amax), цикл нахождения суммы цифр текущего исследуемого числа.
Рассмотрим реализацию всех циклов программы типом цикла с параметром (for).
Первый цикл (вычисление максимального исследуемого числа) оптимально реализуется циклом for, т.к. для нахождения Amax необходимо ровно n раз выполнить умножение на 10.
Второй цикл (цикл перебора всех чисел в исследуемом диапазоне) также оптимально реализуется циклом for, т.к. необходимо рассмотреть все числа от 0 до Amax.
Третий цикл (нахождения суммы цифр текущего исследуемого числа) реализуется циклом for не оптимально, т.к. количество значащих цифр в исследуемом числе может оказаться меньше n, что приведёт к бесполезному выполнению заключительных итераций. Можно сократить количество итераций дополнительной проверкой, но это приведёт к потере времени на эту проверку.
Рассмотрим реализацию всех циклов программы типом цикла с предусловием (while).
Первый цикл (вычисление максимального исследуемого числа) хорошо реализуется циклом while, т.к. для нахождения Amax необходимо ровно n раз выполнить умножение на 10. Нет лишних итераций, проверок. Но по сравнению с for приходится записывать несколько дополнительных строк (инициализация переменной цикла, инкремент переменной цикла). Что в целом приводит к меньшей наглядности программы.
Второй цикл (цикл перебора всех чисел в исследуемом диапазоне) также хорошо реализуется циклом while, т.к. необходимо рассмотреть все числа от 0 до Amax. Но недостатки по сравнению с for те же, что и для первого цикла (дополнительные строки и потеря наглядности).
Третий цикл (нахождения суммы цифр текущего исследуемого числа) реализуется циклом while оптимально, т.к. отсутствуют лишние итерации и избыточные проверки.
Рассмотрим реализацию всех циклов программы типом цикла с постусловием (repeat).
Первый цикл (вычисление максимального исследуемого числа) хорошо реализуется циклом repeat, т.к. для нахождения Amax необходимо ровно n раз выполнить умножение на 10. Нет лишних итераций, проверок. Но по сравнению с for приходится записывать несколько дополнительных строк (инициализация переменной цикла, инкремент переменной цикла). Что в целом приводит к меньшей наглядности программы.
Второй цикл (цикл перебора всех чисел в исследуемом диапазоне) также хорошо реализуется циклом repeat, т.к. необходимо рассмотреть все числа от 0 до Amax. Но недостатки по сравнению с for те же, что и для первого цикла (дополнительные строки и потеря наглядности).
Третий цикл (нахождения суммы цифр текущего исследуемого числа) реализуется циклом repeat хорошо, но по сравнению с оптимальной реализацией на while один раз при нулевом значении исследуемого числа будет выполнена лишняя итерация.
Резюме:
Применение только одного вида цикла для решения данной задачи нецелесообразно, т.к. теряется или эффективность вычислений или наглядность исходного текста программы.
Но если исходить только из критерия эффективности полученного кода, то наилучшим образом для решения данной задачи подходит цикл while, т.к. все циклы реализуются с его помощью оптимально.
---------------------------
Блок-схемы попробуйте реализовать самостоятельно.

@Александра_85 · 27.03.2016, 20:16 **[ТС]**

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

Новые блоги и статьи Все статьи Все блоги /
Особенности gif сгенерированных в Си russiannick 21.10.2026 Рассмотрим генерацию gif файлов, которые в Си имеют свои особенности. Gif представляет собой графический формат популярный в интернете. Посмотрим на палитру. Gif файл сгенерированный в си отличается. . .	FPS контроллер с анимированными Y-Bot и 3D-звуком miniaudio (Box3D, Recast, BehaviorTree.CPP, ozz-animation, ImGui, OpenGL и SDL3) 8Observer8 18.10.2026 Содержание блога \| English Version Полное мультиплатформенное руководство по стартовому проекту с FPS-контроллером игрока, анимированными роботами Y-Bot с 4-слойным блендингом, 3D-физикой Box3D,. . .	Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .
ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	02.03.2016, 12:24 [ТС]
	А вы слова пишете в скобках в коде: их надо оставлять или удалять в программе? 0

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	02.03.2016, 12:26 [ТС]
	Павел, вы просто гений. Так меня выручаете. А то у меня истерика сегодня случилась, когда работу завернули((( 0

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	02.03.2016, 12:36 [ТС]
	Да, такой паскаль. Какой написали в задании использовать, такой и использую. Цикл фор проверила - работает. Спасибо и на том. Не надо ничего писать там. Добавлено через 1 минуту А по блок-схемам - чем они буду отличаться? делать по аналогии с For? Добавлено через 20 секунд С третьей , последней, задачкой поможете? 0

ФедосеевПавел Модератор 8677 / 4514 / 1670 Регистрация: 01.02.2015 Сообщений: 13,956 Записей в блоге: 14
	02.03.2016, 12:51
	for идентичен while. repeat - проверка условия A<=Amax будет не перед телом цикла, а в конце. Миниатюры 0

ФедосеевПавел Модератор 8677 / 4514 / 1670 Регистрация: 01.02.2015 Сообщений: 13,956 Записей в блоге: 14
	02.03.2016, 13:07
	del Добавлено через 3 минуты Вы изучали динамические массивы? 0

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	02.03.2016, 13:11 [ТС]
	Одномерные и двумерные массивы. Как могла, пыталась понять. За месяц до начала сессии задание выслали на выполнение( Динамические массивы - такого нет в методическом пособии 0

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	02.03.2016, 13:17 [ТС]
	А почему N = 100? 0

ФедосеевПавел Модератор 8677 / 4514 / 1670 Регистрация: 01.02.2015 Сообщений: 13,956 Записей в блоге: 14
	02.03.2016, 13:22
	Не N, а Nmax. В теории, можно ввести N, а затем выделить в памяти место под N чисел (даже на 1Гбайт и более). Но вы не изучали такой возможности (динамические массивы). Поэтому придумываем какое-то ограничение (например, 100), на каждый массив выделяем памяти по 100 элементов, хотя используем гораздо меньше (к примеру 10). 0

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	02.03.2016, 13:27 [ТС]
	А при проверке программы N вводить любое? Добавлено через 43 секунды И еще последняя просьба - можете блок-схему показать, как она будет выглядеть в к этой задаче? 0

ФедосеевПавел Модератор 8677 / 4514 / 1670 Регистрация: 01.02.2015 Сообщений: 13,956 Записей в блоге: 14
	02.03.2016, 13:29
	N<=Nmax 1

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	02.03.2016, 13:40 [ТС]
	Павел, еще раз вам огромное спасибо. Прямо большущее. Вы хороший человек) в беде не бросили. Павел, а можно будет к вам обратиться, когда вы будете на форуме. Я сначала сама экзамен попробую прорешать, если не смогу сдать, там три попытки - можно будет у вас спрашивать. Экзамен тестовый с вариантами ответов. Задач много. Я могу к вам обратиться? 0

ФедосеевПавел Модератор 8677 / 4514 / 1670 Регистрация: 01.02.2015 Сообщений: 13,956 Записей в блоге: 14
	02.03.2016, 13:49
	Попытка - не пытка. Но это сегодня я дома. На днях получу комплект документов и буду работать на объектах вдали от интернета. Может кто другой поможет. И ещё есть раздел фриланса - там за деньги оказывают подобную помощь. Цены - правда не знаю. 0

ФедосеевПавел Модератор 8677 / 4514 / 1670 Регистрация: 01.02.2015 Сообщений: 13,956 Записей в блоге: 14
	02.03.2016, 14:10
	Пробовал набрать блок-схему к 3 - но уже устал. Существуют программы для автоматического создания блок-схем по готовому коду. Я ими не пользуюсь, но на форуме наткнулся http://www.fatesoft.com/s2f/. Приложу рисунок, но в нём нет заполнения массива А. Это нужно доделать. Миниатюры 0

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	18.03.2016, 07:02 [ТС]
	Добрый день. По второй задаче вот что ответил преподаватель: Где решение задачи? Оно должно быть обязательно. Я должен понимать, каким образом Вы получили алгоритм решения задачи. Необходимо решить задачу и разработать один(!!!) алгоритм её решения. Один, а не три. Затем этот алгоритм нужно записать на языке Паскаль, но в качестве цикла использовать только один из трех циклов. Затем записать алгоритм ещё раз и снова на языке Паскаль, но выбрать уже другой цикл. Откройте пример оформления контрольной работы в учебно-методическом пособии. Там же все показано. Что и как делать. В блок-схеме один цикл, в программе их три. Откуда взялись программы интересно знать? Кстати, почему в каждой из этих программ я вижу разные типы циклов? Должен быть только один! Один тип цикла – для одной программы? Если используется for, например, то не должно быть циклов while и repeat. Привести решение, правильный алгоритм с комментариями, описание структуры программ, сами программы и ответ на вопрос. 0

@Александра_85 1 / 1 / 0 Регистрация: 02.03.2016 Сообщений: 30
	27.03.2016, 20:16 [ТС]
	Здравствуйте. Понимаете, я ни чего в Паскаль не понимаю. Я составила как вы написали схемы и коды и отправила. Выше уже писала, преподавателя не устроило. Я работу отправила на комиссию, т.к.зачет можно было все таки поставить. Вчера пришел ответ от комиссии. Сказали выполнить второе задание, как раз с циклами. Коды вы написали. Вывод тоже, но мне написали, что все схемы содержат ошибки и нет решения, как я поняла описание как я решила задачу. А что писать не знаю. Вы извините, но мне написали либо решать, либо отчисляться. Им плевать. Знала бы что так, пошла бы в другой вуз. 0