Во время выполнения алгоритма сменяются следующие значения:
a=5 b=4
b=80
a=25
Ответ: a=25
Var
a, i, max: integer;
sum: real;
begin
max := 0;
sum := 0;
i := 0;
repeat
write('Введите число: ');
readln(a);
if a > 0
then begin
sum := sum + a;
i := i + 1;
end;
if max < a
then max := a;
until a = 0;
writeln(#10,'Сумма = ', sum, #10, 'Среднее арифметическое = ', sum / i, #10, 'Наибольшее число - ', max);
end.
# Код на ruby 2.2.3p173
def zadanie(lineal_array, x, y)
k = 0
lineal_array.each {|element|
k = k + 1 if element < x or element > y
}
return k
end
# Примеры применения
p zadanie([1, 2, 3, 4, 5], 2, 3)
1. номер ответ 1
2. номер ответ 4
Удачи в учебе!
Что то криво сюда вставляется из Эклипса. Вот , прикрепил