Задача 1. За першу годину туристи пройшли 4 км, а за кожну наступну годину проходили на 0,5 км менше, ніж за попередню. Який шлях вони пройшли за 3 год? Розв'яжіть задачу склавши алгоритм із циклом з лічильником (блок-схему) і опишіть хід виконання (результат виконання поетапний). Запишіть у зошит. Виконати до 06.04.
var
a: array[1..l] of integer;
d: array[1..l] of real;
i, otr, k, m: integer;
begin
otr:=0; k:=0; m:=0;
//считаем массив а
for i:=1 to l do
begin
readln(a[i]);
//если ввели положительное число,увеличим перем. otr на 1
if a[i] < 0 then
inc(otr);
//если ввели отрицательное число,увеличим перем. k на 1
//и к переменной m прибавим элемент
if a[i] > 0 then
begin
inc(k);
inc(m, a[i]);
end;
end;
//заполним массив d
for i:=1 to l do
//если индекс четный, присвоим элементу otr
//иначе присвоим среднее арифметическое
if i mod 2 = 0 then
d[i] := otr
else
d[i] := m/k;
end.
8775 * 8 = 70200 бит занимает сообщение
70200 : 6 = 11700 символов в сообщении
найдем х - количество символов в строке
6 * 30 * х = 11700
180х = 11700
х = 65
ответ. в строке 65 символов.