Определи, что будет выведено в результате работы программы: program prog;
var i, s: integer;
arr: array [1..10] of integer;
begin
for i := 1 to 10 do arr[i] := i * 5 + 4;
s := 0;
for i := 1 to 10 do
begin
if arr[i] mod 6 = 0 then s := s + arr[i];
end;
write(s)
end.
Заранее
78
Объяснение:
мастер кода просто закинул всё в pascal и посмотрел что получится