Предмет: Информатика,
автор: danilkagubin
найти сумму элементов массива x[38] стоящих в четных ячейках
Ответы
Автор ответа:
0
program arr;
var x:array[1..38] of integer;
i, s:integer;
begin
for i:=1 to 38 do
read(x[i]);
for i:=1 to 38 do
if i mod 2 = 0 then
s := s+x[i];
writeln(s);
end.
var x:array[1..38] of integer;
i, s:integer;
begin
for i:=1 to 38 do
read(x[i]);
for i:=1 to 38 do
if i mod 2 = 0 then
s := s+x[i];
writeln(s);
end.
Автор ответа:
0
оо большое спасибо
Похожие вопросы
Предмет: История,
автор: nastyakrashlikee
Предмет: Физика,
автор: salamatdinara3
Предмет: Русский язык,
автор: sofianikiforova98
Предмет: Математика,
автор: svoroses
Предмет: Математика,
автор: 22327