СРОЧНО НУЖЕН ОТВЕТ Определите, что выведет данная программа:
var i: integer;
begin
for i := 7 to 14 do
if (i mod 2 = 0) and (i >= 10) then
write(i div 2, ', ')
else
if i <= 10 then
write(i * 2, ', ')
end.
14, 16, 18, 5, 22, 6, 26, 7
14, 16, 18, 5, 6, 7
14, 16, 18, 5, 6
14, 4, 18, 5, 6, 7
var i: integer;
begin
for i := 7 to 14 do
if (i mod 2 = 0) and (i >= 10) then
write(i div 2, ', ')
else
if i <= 10 then
write(i * 2, ', ')
end.
14, 16, 18, 5, 22, 6, 26, 7
14, 16, 18, 5, 6, 7
14, 16, 18, 5, 6
14, 4, 18, 5, 6, 7
More Questions From This User See All