0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
1 | |
Схема алгоритма10.10.2009, 16:52. Показов 2017. Ответов 20
Метки нет (Все метки)
Составьте пожалуйста схему алгоритма программы с таким исходным кодом:
Код
program lab1; const n=80; k=100; var a : array[1..n] of integer; s,i: integer; begin randomize; for i:=1 to n do begin a[i]:=random(k); write(a[i]:3); if i mod 10 = 0 then writeln; end; s:=0; for i:=1 to n do s:=s+a[i]; writeln; writeln('S= ',s); readln; end.
0
|
10.10.2009, 16:52 | |
Ответы с готовыми решениями:
20
Блок-схема алгоритма Блок-схема алгоритма Блок-схема алгоритма Правильна ли блок-схема алгоритма? |
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 17:56 [ТС] | 3 |
2 hohol: Не переходит на тот линк..
Я создал свою схему во вложении. Верна ли она?
0
|
7 / 7 / 0
Регистрация: 03.10.2009
Сообщений: 46
|
|
10.10.2009, 18:36 | 4 |
У тебя второй цикл не от туда выходит, он не может в обознычении начинатся
Добавлено через 4 минуты Вот твоя схема с правильным циклом, только типы фигур расставишь как в твоем примере, а то здесь чисто прямоугольники, ну ты, я надеюсь, разберешься...
1
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 18:38 [ТС] | 5 |
У меня ошибку выдаёт при переходе на ссылку, которую ты мне дал.
0
|
7 / 7 / 0
Регистрация: 03.10.2009
Сообщений: 46
|
|
10.10.2009, 18:39 | 6 |
на первую или вторую?
1
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 18:40 [ТС] | 7 |
О, точно, протупил, спасибо!
0
|
7 / 7 / 0
Регистрация: 03.10.2009
Сообщений: 46
|
|
10.10.2009, 18:40 | 8 |
все нормально?
1
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 18:42 [ТС] | 9 |
На обе!
Добавлено через 1 минуту В решении всё нормально, разобрался, а если ты за линк (ссылку) имел ввиду, то всё равно н заходит.
0
|
7 / 7 / 0
Регистрация: 03.10.2009
Сообщений: 46
|
|
10.10.2009, 18:48 | 10 |
Проверь сейчас вторую
Добавлено через 29 секунд если снова не получится напиши....
1
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 18:52 [ТС] | 11 |
Да, всё прекрасно заходит. Схема сродна с моей, просто у меня минимизирована, т.к. препод захотел.. Спасибо ещё раз за помощь!
Добавлено через 49 секунд + ;-)
0
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 21:00 [ТС] | 12 |
А кто может изменить исходный текст, чтобы вместо цифр в массиве появлялись символы, а сумма вычислялась по значению символа в символьной таблице?
0
|
Программист 1С
859 / 647 / 187
Регистрация: 03.03.2009
Сообщений: 1,154
|
|
10.10.2009, 21:03 | 13 |
oshilan, Воспользуйтесь таблицой ASCII-кода....она есть на любом сайти программирования...воспользуйтесь поиском!
1
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 21:05 [ТС] | 14 |
Она у меня есть, мне просто нужно изменить элементы на char, но чёто не клеется компиляция..
0
|
Программист 1С
859 / 647 / 187
Регистрация: 03.03.2009
Сообщений: 1,154
|
|
10.10.2009, 21:08 | 15 |
oshilan, Какие именно элементы вы хотите изменить?
1
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 21:18 [ТС] | 16 |
Кто может закоментировать это:
Код
Program lab2; const n=255; type tx=array[0..n] of integer; var m :tx; a :char; i,s :integer; begin for i:=0 to n do begin m[i]:=i; write(chr(i),' '); end; s:= 1; for i:= ord(s) to n do s:= s+m[i]; writeln; writeln('S= ',s); readln; end. Добавлено через 9 минут 2 Давид: Ну все. Исходный текст в шапке.
0
|
Программист 1С
859 / 647 / 187
Регистрация: 03.03.2009
Сообщений: 1,154
|
||||||
10.10.2009, 21:21 | 17 | |||||
Так вот...
1
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 21:35 [ТС] | 18 |
Спасибо! +
Добавлено через 1 минуту А вот не знаю (текст не мой). Можете ли вы с нуля написать текст где создаётся массив из 80-ти элементов (символов) и подсчитать их сумму. + обеспечен Добавлено через 9 минут Ага, реально. +
0
|
Программист 1С
859 / 647 / 187
Регистрация: 03.03.2009
Сообщений: 1,154
|
|||||||||||
10.10.2009, 21:44 | 19 | ||||||||||
Все просто....третью строку переправьте на
1
|
0 / 0 / 0
Регистрация: 03.10.2009
Сообщений: 56
|
|
10.10.2009, 21:58 [ТС] | 20 |
Я это понял, но чёто при запуске программы издаётся писк и массив некрасивый какой-то (разрыв строки иль что-то такое).
Добавлено через 7 минут Яху! Я понял. Нужно просто маску chr применить при выводе на экран: Код
write(chr(a[i]):3);
0
|
10.10.2009, 21:58 | |
10.10.2009, 21:58 | |
Помогаю со студенческими работами здесь
20
Приведена блок-схема алгоритма Схема алгоритма получения (печати) всех перестановок из n чисел Блок-схема алгоритма вычисления произведения элементов квадратной матрицы, расположенных на главной диагонали Составить блок – схему алгоритма и определить, что выводится в результате выполнения следующего алгоритма Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |