Задано два целых числа А и В. Найдите суммы нечетных чисел от А до В. Составить программу.
10-11 класс
|
program mm;
var a,b,i,summ:integer;
begin
Writeln ('Введите А и В');
readln(a,b);
for i:=a to b do
if i mod 2
Другие вопросы из категории
до 50, распечатать содержимое элементов массива в строку.
Нужно прописать в программе
Функция должна возвращать
Величину
среднего абсолютного отклонения
Отношение
среднего квадратического отклонения к среднему абсолютному отклонению
Среднее
арифметическое из средних абсолютных отклонений поддиапазонов
var
a,B,N,i:integer;
bol:boolean;
begin
i:=0;
n:=0;
bol:=true;
Writeln('Введите число B');
readln(B);
Writeln('Введите число N');
Readln(N);
Writeln('Введите ',N,' целых чисел.');
While i < n
Читайте также
1)Для всех чисел от -5 до 60 найти и вывести их кубы.
2)Найдите сумму нечетных чисел 1 до 100.
3)Подсчитать количество всех четных чисел от -20 до 20
4)Для всех четных чисел от 10 до 78 найти и вывести значение функции y=5x^3-6x
Помогите!
порядке возрастания все целые числа, расположенные между A и B(в том числе A и B),
a также количество N этих чисел
ЦИКЛ с ПАРАМЕТРОВ
целых числа N и K (1 <= N <= 10^100, 1 <= K <= 10^9) записанные в двух отдельных строках.
Выходные данные:В выходной поток выведите остаток от деления N на K.
Пример входного файла (input.txt): 239 16 Пример выходного файла (output.txt): 156.
2)Ввести целое число и определить количество черных и нечетных цифр.
Пример:
Введите целое число :12547
количество нечетных цифр:3
количество четных цифр:2
(A < B). Найти произведение всех целых чисел от A до B
включительно.