Вопрос по информатике:
Задача 1
Для заданного числа N составьте программу вычисления суммы S=1+1/2+1/3+1/4+…+1/65.
Задача 2
Вывести на экран кубы целых чисел от 1 до 9. Найти сумму и определить количество полученных чисел.
Задача 3
Напишите программу вывода всех четных чисел от 2 до 100 включительно и подсчитайте сумму.
Задача 4
Напишите программу, определяющую сумму всех нечетных чисел от 1 до 99.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 17.05.2016 08:01
- Информатика
- remove_red_eye 19560
- thumb_up 50
Ответы и объяснения 1
Внимание! Если программа не работает, обновите версию!
begin
SeqGen(ReadInteger('n='),i->1/(1+i)).Sum.Println; // №1
// №2
var a:=ArrGen(9,i->(i+1)*Sqr(i+1)); a.Println;
Writeln('Кол-во=',a.Length,', S2=',a.Sum);
Writeln('S3=',Range(2,100,2).Println.Sum); // №3
Writeln('S4=',Range(1,99,2).Sum) // №4
end.
Пример
n= 65
4.75927551909038
1 8 27 64 125 216 343 512 729
Кол-во=9, S2=2025
2 4 6 8 10 12 14 16 18 20 22 24 26 28 30 32 34 36 38 40 42 44 46 48 50 52 54 56 58 60 62 64 66 68 70 72 74 76 78 80 82 84 86 88 90 92 94 96 98 100
S3=2550
S4=2500
- 18.05.2016 09:34
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.