Найдите ошибки и запишите фрагмент программы без них. Программа ищет отрицательные элементы последовательности А вычисляет их количество и заменяет их на

March 2023 1 10 Report

Найдите ошибки и запишите фрагмент программы без них.
Программа ищет отрицательные элементы последовательности А вычисляет их количество и заменяет их на значение их модулей.

For i:=1 to 50
If A[i]<0
Then A[i]:=absA[i];
K:=K+1;
End

Answers & Comments

vimmortal2

Программа:

Pascal:

for i := 1 to 50 do

if A[i] < 0

then begin A[i] := abs(A[i]);

K := K + 1;

End;

Объяснение:

Предоставлен рабочий фрагмент программы, а ошибки выделены полужирным:

В первой строке не хватало "do".
В третьей строке не хватало слова "begin" после слова then, потому что выполнится более одного действия.
В третьей строке не хватало скобок у функции abs().
В пятой строке не хватало точки с запятой после "end".

1 votes Thanks 1

Answers & Comments

2 3pi 64af81a33cfe4

4 2 20 649fb050c865e

4f8a4bfcee6fce39fa6e471c0971ccb1

1 3sin2x5sin2x 8cos2x0 2sin2x 3cos2x2 2

sin xsin y1 xy

3 7 3 7 648fef547b48a

1 2 648f8aa350db7

11 1 2 3 4 648e5f1c5c067

80 550 5

1 2 3 648c72a77d1a1

Helpful Links

Helpful Social