сервис вопросов и ответовНаписать операторы, которые посчитают и просуммируют четные числа на интервале от 45 до 3.
10-11 класс|
|
SWAG528
24 мая 2014 г., 7:17:40 (9 лет назад)
Пгсж
24 мая 2014 г., 8:37:57 (9 лет назад)
Sub z()
For i = 44 To 3 step -2
k=k+1
s=s+i
Next i
Print k;"; ";s
End Sub
Ответить
Другие вопросы из категории
Задачи pascal.(34б)
Если все элементы одномерного массива положительные то вывести сообщение "УСЛОВИЕ ВЫПОЛНЯЕТСЯ" иначе "УСЛОВИЕ НЕ ВЫПОЛНЯЕТСЯ"
Дан массив из N ЭЛЕМЕНТОВ. Определить произведение элементов кратных заданному k(k-задается с клавиатуры).
Дан массив из N элементов.Определить ПРОИЗВЕДЕНИЕ тех элементов,которые кратные 3.
Читайте также
1) Задано положительное число A. Найти сумм всех четных чисел в интервале от 1 до A. Число А может иметь дробную часть.
2) Задано целое положительное число А и В. Найти квадратные корни целых чисел в интервале от А до В. Замечание: A<B
Дана строка , в которой содержится осмысленное текстовое сообщение. Слова сообщения разделяются В заданном формате дд- целое число из диапазона от 1 до
31, мм - целое число из диапазона от 1 до 12, а гг - целое число из диапазона от 1 до 2020 (если какая-то часть формата нарушена, то данная подстрока в качестве даты не рассматривается.) Заменить каждую дату сообщения на дату следующего дня. Написать программу на Паскале. Сроооооооооооооочнооо. Пооожалуйста.....
1)Вычислить значения функции y=4*x^3-2*x^2+5 для x, изменяющегося от -3 до 1 с шагом 0,1 на языке ПАСКАЛЬ!!СРОЧНОО ЗАВТРА ЭКЗАМЕН РЕБЯЯТКИ!
2)Найти количество всех нечетных чисел на интервале от 11 до 20
3)Найти сумму целых положительных четных чисел на интервале от 1 до 100
4)Найти сумму ряда,общий член которого равен А(х)=1/(3*N-2)*(3*N+1)
5)Дано произвольное число n≤100.Определить количество цифр в числе
ОЧЕНЬ НУЖНО!!НА ЯЗЫКЕ ПАСКАЛЬ!ВЫРУЧАЙТЕ!
Вы находитесь на странице вопроса "Написать операторы, которые посчитают и просуммируют четные числа на интервале от 45 до 3.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.