Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
открыть пуск
зайти в раздел все программы
выбрать программу
нажать двойным щелчком
приступить к работе
vara: array[1..500] of integer; i,k,n: integer; begink: =0; write('n= '); readln(n); for i: =1 to n do readln(a[i]); for i: =1 to n do k: =k+a[i]*a[i+1]; writeln(k); end.
ответ 138 номер последнего
решение 1024/8+10=128+10=138
1 байит= 8 бит
Популярные вопросы