
Korzh
5 год назад
Дан фрагмент программы. Что появится на экране?S:=0;FOR I:=1 TO 4 DOBEGINMAS[I]:=I;S:=S+MAS[I];END;WRITELN (S);
ОТВЕТЫ

Lidiya
Oct 24, 2020
var
s: integer;
mas: array[1..4]of integer;
begin
s := 0;
for var i := 1 to 4 dobegin
mas[i] := i;
s := s + mas[i];
end;
writeln(s);
end.
s: integer;
mas: array[1..4]of integer;
begin
s := 0;
for var i := 1 to 4 dobegin
mas[i] := i;
s := s + mas[i];
end;
writeln(s);
end.
337
Смежные вопросы: