Как исправить программу чтобы она решала поставленную перед программистом задачу

Ответ:

1.

program n1;

var

k, s: integer;

a: array [1..8] of integer;

begin

for k := 1 to 8 do readln(a[k]);  // с клавиатуры вводится массив из 8

s := 0;                                           элементов

for k := 1 to 8 do

if a[k] < 0 then s := s + a[1];  // в цикле 4 раза к s прибавляют 1-ый элемент

writeln(s);                             // выводится s

end.

Ответ: 4(т.к 1-ый элемент массива 1 и в нём 4 отрицательных элемента)

2.  

Надо строку if a[k] < 0 then s := s + a[1];

Заменить на строку if a[k] < 0 then s := s + a[k];

Объяснение:

Вариант 1

1. Дан одномерный массив а из шести элементов:

1) Как объявить этот массив в программе, записанной на языке Паскаль?

2) Чему равно значение элемента массива с индексом 4?

3) Чему равно значение элемента массива а[а[4]]?

2. Программа обрабатывает одномерный целочисленный массив Dat:

Заполните трассировочную таблицу и определите, какие числа будут выведены в результате выполнения следующего фрагмента программы.

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

Каким окажется ответ после исполнения этой программы, если в качестве элементов массива будут введены числа 1,

Как исправить программу, чтобы она решала поставленную перед программистом задачу?

Вариант 2

1. Дан одномерный массив а из семи элементов:

1) Как объявить этот массив в программе, записанной на языке Паскаль?

2) Чему равно значение элемента массива с индексом 5?

3) Чему равно значение элемента массива а[а[5]]?

2. Программа обрабатывает одномерный целочисленный массив Dat:

Заполните трассировочную таблицу и определите, какие числа будут выведены в результате выполнения следующего фрагмента программы.

3. Дополнительное задание. В представленном фрагменте программы значения одномерного массива задаются с помощью следующего оператора цикла:

Какие значения будут присвоены элементам массива?

07.06.2019

5 июня Что порешать по физике

30 мая Решения вчерашних ЕГЭ по математике

На обработку поступает последовательность из четырёх целых чисел. Нужно написать программу, которая выводит на экран сумму всех отрицательных чисел последовательности и максимальное число в последовательности.

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

Бейсик	Python

for i in range(1, 5):

Алгоритмический язык
Паскаль

нц для i от 1 до 4

var s,i,x,mx: integer;

for i := 1 to 4 do

using namespace std;

Последовательно выполните следующее.

1. Напишите, что выведет эта программа при вводе последовательности -5 2 -4 3.

2. Приведите пример такой последовательности, содержащей хотя бы одно неотрицательное число, что, несмотря на ошибки, программа печатает правильный ответ.

3. Найдите все ошибки в этой программе (их может быть одна или несколько). Известно, что каждая ошибка затрагивает только одну строку и может быть исправлена без изменения других строк. Для каждой ошибки:

1) выпишите строку, в которой сделана ошибка;

2) укажите, как исправить ошибку, т.е. приведите правильный вариант строки.

Достаточно указать ошибки и способ их исправления для одного языка программирования.

Обратите внимание, что требуется найти ошибки в имеющейся программе, а не написать свою, возможно, использующую другой алгоритм решения.

Исправление ошибки должно затрагивать только строку, в которой находится ошибка.

Решение использует запись программы на Паскале. Допускается использование программы на трёх других языках.

1. Программа выведет два числа: -4 и 3.

2. Программа напечатает правильный ответ, например, для последовательности -4 7 8 9

3. Первая ошибка. Неверная инициализация максимума.

Строка с ошибкой:

Возможный вариант исправления:

4. Вторая ошибка. Неверно ведётся суммирование элементов.

int main() <
int n,m,k,cnt;
for (int i=0; i cout cout >n;
cout cin>>m; cnt=0;
for (int j=1; j cin>>k;
if (k>m) cnt++;
m=k;
>
cout >
system(“pause”);
return 0;
>

Порядок выполнения

1. Зайти в Borland
   Pascal.

2. Набрать текст программы
   для решения задачи № 1 и получить ответ
   (при
   и;и).

3. Исправить программу так,
   чтобы она решала задачу без использования
   слова else.

4. Набрать текст программы
   для решения задачи № 2 и получить ответ
   (при
   ;;;).

5. Исправить программу так,
   чтобы она решала задачу без использования
   оператора case.

Примеры задач

Задача 1. Вычислить величину .	Задача 2. Вычислить величину , где a и c – целые числа.
Program Lab2a;	Program Lab2b;
Var	Var a,c:integer;
a,b,c:real;	Begin
Begin	read(a);
writeln(‘Введи a,b’);	case a of
read(a,b);	0: c:=2;
if a>b	1..10: c:=3;
then c:=(a-b)/(a*b)	-1,11: c:=4
else c:=exp(b*ln(a));	else c:=5
writeln(‘c=’,c:10:3);	end;
End.	writeln(c);
	End.

Дополнительное задание

1. Вычислить
   

2. Вычислить
   при

3. Вычислить
   ,
   где

4. Вычислить
   где.

5. Вычислить
   ,
   где

6. Вычислить
   .

7. Найти
   

8. Найти
   

Контрольные вопросы

1. Что такое алгоритм
   линейной структуры? Перечислите
   операторы, реализующие этот алгоритм.

2. Что такое алгоритм
   разветвляющейся структуры? Перечислите
   операторы, реализующие этот алгоритм.

3. Какой вид имеют составной
   оператор и оператор присваивания, а
   также что они означают?

4. Какой вид имеют операторы
   ввода и вывода, а также что они означают?

5. Какой вид имеет оператор
   безусловного и условного перехода, а
   также что они означают?

6. Какой вид имеет оператор
   варианта и что он означает?

7. Что такое метка, условие
   и селектор? К каким типам данных
   относятся эти понятия?

8. Напишите, что означает
   каждая строка в вышеприведённых
   программах.

9. Напишите программу к одной
   из задач дополнительного задания.

Лабораторная работа № 3. Программирование циклов Алгоритм циклической структуры

Алгоритм
циклической структуры – алгоритм,
в котором производится многократное
повторение однотипных действий.

Цикл–
многократно повторяющийся участок
алгоритма. Цикл включает заголовок
цикла, тело цикла и конец цикла.

Циклы делятся
на:

1.  Цикл
с предусловием(условие выхода из
цикла проверяется в начале перед
действиями в теле цикла).

2.  Цикл
с постусловием(условие выхода из
цикла проверяется в конце после действий
в теле цикла).

3.  Цикл
с параметром(цикл выполняется
фиксированное количество раз, определяемое
параметром цикла).

Для реализации
алгоритма циклической структуры в
языке Pascalиспользуются
следующие операторы:

1.  Оператор
цикла с предусловиемимеет вид:

while
U
do
Op

где while– пока,do– делать, U– условие, Op– оператор.

Оператор
означает, что пока условие U
истинное, повторять оператор Op
в цикле; как только условие станет
ложным, выйти из цикла.

2.  Оператор
цикла с постусловиемимеет вид:

repeat

Op1;

…

OpN

until
U

где repeat– повторять,until– до тех пор пока,
Op1– оператор 1-й,OpN– операторN-й,
U– условие.

Оператор
означает, что повторять операторы
Op1
и т.д., … OpN
в цикле до тех пор, пока условие U
не станет истинным; как только
условие станет истинным, выйти из цикла.

3.  Оператор
цикла с параметром(при увеличении
параметра) имеет вид:

for Par
:= Nz
to Kz
do Op

где for– для,to– до,do– делать,Par– параметр цикла,Nz– начальное значение,Kz– конечное значение,Op– оператор.

Оператор
означает, что для параметра Par
, увеличивающегося от начального
значения Nz
до конечного значения Kz
с шагом 1,
повторять оператор Op
в цикле.

4.  Оператор
цикла с параметром(при уменьшении
параметра) имеет вид:

for Par
:= Nz
downto Kz
do Op

где for– для,downto– вниз до,do– делать,Par– параметр цикла,Nz– начальное значение,Kz– конечное значение,Op– оператор.

Оператор
означает, что для параметра Par
, уменьшающегося от начального значения
Nz
до конечного значения Kz
с шагом (-1),
повторять оператор Op
в цикле.

Параметр
цикла (или счётчик циклов) –
переменная порядкового типа, которая
изменяется в цикле от начального до
конечного значения с каким-либо шагом.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]

• #
• #
• #
• #
• #
• #
• #
• #
• #
• #
• #