Регистрация
wiamous1
04.03.2023 05:16
Информатика
Есть ответ 👍

Подсчитать произведение элементов, которые меньше 4 в данной программе. program massiv;
var oc: array [1..10] of integer; i: integer; s:real;
begin
s:=0;
for i:=1 to 8 do
begin
oc[i]:=1+random(10);
write(oc[i],'; ');
end;
writeln();
end.

229
245
Посмотреть ответы 1

Ответы на вопрос:

Danik07727
Danik07727
4,7(10 оценок)

насколько я понял,

tmp : = a[10] и a[1] : = tmp находятся вне цикла, так что a[1] в конце будет равно 21

Популярно: Информатика