Что будет выведено в результате выполнения:
А: = 'ЭЛЕКТРОСТАНЦИЯ';

WRITELN (COPY (А, 2, 3) + COPY (A, 12, 3) ); ?



Определите результат выполнения:
С: = ' ЛЕФОРТОВО' ;

F: = LENGTH (С) + LENGTH (С); ?



Из слова ИНФОРМАТИКА получено слово ФОРМАТ. Вставьте пропущенные значения
COPY('ИНФОРМАТИКА', ,).



Что будет выведено в результате выполнения:
WRITELN ('24 + 24 =', 24 + 24)?



Что будет выведено в результате выполнения:
А: = 'ЭЛЕКТРОСТАНЦИЯ';

WRITELN(COPY(A,1,7)); ? Дам 20 баллов за полный ответ

Program E2_2; Var a: Array [1..8] Of Integer; s, k: Integer; Begin For k := 1 To 8 Do Readln (a[k]); s := 0; For k := 1 To 8 Do If a[k] < 0 Then s := s + a[k]; Writeln (s) End.в записи оператора s := s + a[k] была допущена ошибка - вместо него был записан оператор s := s + 1. Каким оказался ответ после исполнения неверной программы, если в качестве элементов массива были введены числа (-1, 3, -2, 4, -5, 6, -7, 8)?

поможете решить

заранее огромное спасибо

Ответ: 4. Если a[k] < 0 то s := s + 1 - считаем отрицательные элементы массива.

спасибо