сервис вопросов и ответовнаписать программу, которая для первых n натуральных чисел находит сумму чётных и произведение нечётных чисел. число n вводится с клавиатуры . выполнить
5-9 класс|
|
программу для n=13 , записать результат
3333natali33
24 дек. 2014 г., 8:05:46 (9 лет назад)
Kiselyovakarin
24 дек. 2014 г., 10:56:36 (9 лет назад)
const n=13;
var i,s,p:integer;
begin
s:=0; p:=1;
for i:=1 to n do begin
if (i mod 2 = 0) then s:=s+i;
if (i mod 2 <> 0) then p:=p*i;
end;
writeln("Сумма четных = ",s," , произведение нечетных =",p);
end.
Ответить
Другие вопросы из категории
Придумайте сами примеры объектов, информацию о которых удобно представить в виде многоуровневого списка. Создайте соответствующий многоуровневый список.
Многоуровневый список про устройства современного компьютера не принимается!!!
срочно подскажите мне!!!!
Дано целое число А. Если значение А > 0, то необходимо
увеличить его на единицу. Разработать схему алгоритма для решения этой
задачи. Протестировать алгоритм для A=5, A=-4, A=0. сделать в паскале.
Программу я написала:
Program n1;
var A: real;
begin
readln (a);
if a>0
then a:=a+1;
writeln;
end.
правильно или нет? и какие у меня должны выходить значения?
СРОЧНО!!!нужно составить программу для Робота из Кумира(программа).т.е.ход действий.спамы и вопросы будут отмечены нарушением,дабы пунктов и так
много.смотрите во ВЛОЖЕНИЯХ!там дано местоположение Робота на 1 рисунке,а на 2,что в результате должны получить.
Читайте также
помогите пожалуйста..очень надо....что нибудь из этих задач..1)написать программу которая поменяет местами первую и последнюю букву в слове. 2)написать
программу которая вставит между буквами веденного слова пробелы 3)написать программу вывода на экран деление двух чисел
Пожалуйста помогите решить желательно все или хотя бы одну (P.S. программа для программы Turbo Pascal) 1.Написать программу, которая предлагает
ввести 3 значное число и находит сумму его цифр.
2. Написать программу, которая предлагает ввести 3 значное число и меняет порядок цифр наоборот. (123- 321)
3.Написать программу, которая предлагает ввести три числа с клавиатуры, находит их сумму, произведение и среднее арифметическое.
Помогите плиз срочно 1)Написать программу,которая спрашивает"Который час?" и,в зависимости от введенного времени,выводит приветствие:"Доброе
утро","Добрый день","Добрый вечер", "Спокойной ночи". 2)Написать программу,которая определяет,принадлежит ли точка с координатами (x,y)Заштрихованной области,ограниченной точками(x1,y1)(x2,y2).
Вы находитесь на странице вопроса "написать программу, которая для первых n натуральных чисел находит сумму чётных и произведение нечётных чисел. число n вводится с клавиатуры . выполнить", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.