1. Дан массив из 12 натуральных чисел. определить сумму 6 первых элементов массива. 2. Дан массив из 10 натуральных чисел. Определить количество элементов равных контрольному числу 7.
Answers & Comments
kage1998
1) program chik; const n=12; var i,s:integer; a:array[1..12]of integer; begin s:=0; for i:=1 to n do begin read(a[i]); if(i<7)then s:=s+a[i]; end; writeln(s); end. 2) program chik; const n=10; var i,s:integer; a:array[1..12]of integer; begin s:=0; for i:=1 to n do begin read(a[i]); if(a[i]=7)then s:=s+1; end; writeln(s); end.
Answers & Comments
program chik;
const n=12;
var i,s:integer;
a:array[1..12]of integer;
begin
s:=0;
for i:=1 to n do
begin
read(a[i]);
if(i<7)then s:=s+a[i];
end;
writeln(s);
end.
2)
program chik;
const n=10;
var i,s:integer;
a:array[1..12]of integer;
begin
s:=0;
for i:=1 to n do
begin
read(a[i]);
if(a[i]=7)then s:=s+1;
end;
writeln(s);
end.