shumilovs7252
?>

Таблица 12. Скрипты диалога Сапарбека и Самал Скрипт Сапарбекакогда щелкнут поПоказатьсяждать 3.3 секундговорить !в течение 1.5 секундждать 2.5 секундговорить Да в течение 1 секундждать 4 секундговорить хорошо в течение 2 секунд ждать 23 секундговорить дa в течение 2 секундСкрипт Самал​

Информатика

Ответы

Стуканова УЧРЕЖДЕНИЕ1877

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];

Объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Таблица 12. Скрипты диалога Сапарбека и Самал Скрипт Сапарбекакогда щелкнут поПоказатьсяждать 3.3 секундговорить !в течение 1.5 секундждать 2.5 секундговорить Да в течение 1 секундждать 4 секундговорить хорошо в течение 2 секунд ждать 23 секундговорить дa в течение 2 секундСкрипт Самал​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

danielianruz
Salnikov1730
lele52
lavr74
Tanyamitia
Mukhlaev-Olga
Abdullaev
Кочугурова
innesagrosheva22
uksusoval617
oduvanalex
сергей1246
arhangel1055
Serezhkin
magnit-expo