Что выдаст программа после выполнения ? Program q1;
const N = 11;
var a: array[1..N] of integer;
i,s: integer;
begin
for i:=1 to N do begin
a[i] := i-6;
end;
s := 0;
for i:=1 to N do
if a[i] < 0 then s := s + a[i];
writeln(‘s=’,s);
end.
Что выдаст программа после выполнения ? Program q1;
const N = 11;
var a: array[1..N] of integer;
i,s: integer;
begin
for i:=1 to N do begin
a[i] := i-6;
end;
s := 0;
for i:=1 to N do
if a[i] < 0 then s := s + a[i];
writeln(‘s=’,s);
end.
const N = 11;
var a: array[1..N] of integer;
i,s: integer;
begin
for i:=1 to N do begin
a[i] := i-6;
end;
s := 0;
for i:=1 to N do
if a[i] < 0 then s := s + a[i];
writeln(‘s=’,s);
end.
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
s=-15