Question

Определи, что будет выведено в результате работы программы:



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.
Заранее спасибо

Answer 1

Ответ:

78

Объяснение:

мастер кода просто закинул всё в pascal и посмотрел что получится