Разработать программу используя рекурсию (нельзя использовать циклы и желательно не использовать массивы), сначала пишем какое количество чисел будет в строке (count), затем пишем последовательно чисел, например, (1, 2,3 ,6, -2, -5, -10, 5), затем программа выводит номер последнего отрицательного числа(счёт идёт с нуля, значит -10 это 6 номер). Если нет ни одного отрицательного числа, вывести -1.
Проходили только условные конструкции, методы, массивы, не надо использовать сложные алгоритмы или встроенные функции для обработки массивов.
Язык java.
Если число кратно 2 и одновременно 3, то оно кратно и их произведению, т.е. 2 х 3 = 6.
Ближайшее число, превышающее 10 и кратное 6 - это 12.
Начинаем от него и идем с шагом 6, пока не превысим 99.
1. Так можно решить по-современному:
// PascalABC.NET 3.1, сборка 1190 от 05.03.2016
begin
Writeln('Искомая сумма равна ',Range(12,99,6).Sum)
end.
Результат выполнения программы
Искомая сумма равна 810
2. А так - "по-школьному":
// PascalABC.NET 3.1, сборка 1190 от 05.03.2016
var
i,s:integer;
begin
i:=12;
s:=0;
while i<=99 do begin
s:=s+i;
i:=i+6
end;
Writeln('Искомая сумма равна ',s)
end.