Question

В массиве F(15) найти сумму элементов, стоящих на нечетных местах

Answer 1

const
    n = 15;
var
    i, s: integer;
    a: array[1..n] of integer;

begin
    s := 0;
    for i := 1 to n do
    begin
        write('a[', i, ']=');
        readln(a[i]);
        if i mod 2 = 1 then
            s := s + a[i];
    end;
    writeln(s);
end.

Answer 2

а получается что таким способом отучают детей оптимально мыслить.

Answer 3

Именно. Фраза "дан массив..." предполагает, что пишется фрагмент программы, к моменту исполнения которого имеется уже заполненный массив. Но при этом требуется написать полную программу и этот массив приходится создавать и заполнять. А по-хорошему надо требовать процедуру, в которую массив передается.

Answer 4

логично. ведь так же ж и пишется по нормальному

Answer 5

А потому что у нас изучение предмета идет "через назад" и модульность программ изучается в конце и тут-то появляется понимание, что все эти Write и Read - всего лишь процедуры, а sqrt, abs и тюдю - функции.

Answer 6

да школьную информатику даже вспоминать не хочется с этой точки зрения. Но кто хочет и может потом разберется.