Маша составляет 6-буквенные слова из букв З, Е, Р, К, А, Л, О, содержащие букву К, но не более 4 раз

Question

Информатика: Маша составляет 6-буквенные слова из букв З, Е, Р, К, А, Л, О, содержащие букву К, но не более 4 раз​

PollinaKipollina24 · Accepted Answer

Var a: array[1..10] of integer;
b: array[1..10] of real;
i,n: integer;
s: real;
begin
s:=0; n:=0;
write('массив a: ');
for i:=1 to 10 do
begin
read(a[i]);
if a[i]<0 then
begin
s:=s+a[i];
n:=n+1;
end;
write(a[i],' ');
end;
s:=s/n;
writeln;
writeln('среднее арифметическое отрицательных: ',s);
writeln('количество отрицательных: ',n);
write('массив b: ');
for i:=1 to 10 do
begin
if a[i]<0 then b[i]:=s
else b[i]:=a[i];
write(b[i]:7:3);
end;
end.

массив a: 2 2 -3 1 -5 -6 -5 9 -7 5
среднее арифметическое отрицательных: -5.2
количество отрицательных: 5
массив b: 2.000 2.000 -5.200 1.000 -5.200 -5.200 -5.200 9.000 -5.200 5.000

Маша составляет 6-буквенные слова из букв З, Е, Р, К, А, Л, О, содержащие букву К, но не более 4 раз​

MOGZ ответил