сервис вопросов и ответовсоставьте программу для решения следующей задачи массив б задан случайным образом подсчитать сумму элементов массива состоящих из нечётных чисел
5-9 класс|
|
Svetavetochka2
28 дек. 2013 г., 17:42:55 (10 лет назад)
Tatiyana24bk
28 дек. 2013 г., 19:11:49 (10 лет назад)
var b:array [1..100] of integer; s,i:integer;
begin
for i:=1 to 100 do
begin
b[i]:=random(-100,100);
if odd(b[i]) then s:=s+b[i];
end;
write(s);
end.
Ответить
Другие вопросы из категории
Вспомните по одному объекту каждого из приведенных множеств и обозначьте его единичным именем в этом множестве:
а)остров
б)мореплаватель
в)орфограмма
г)математический знак
д)формула
е)поэма
Помогите,пожалуйста!
Читайте также
Программа выполняется в Паскале! Составьте программу для решения следующей задачи:Дядюшка подарил своему племяннику на первый день
рождения 1 доллар. В каждый следующий день рождения он удваивал свой подарок и прибавлял к нему столько долларов, сколько лет исполнилось его племяннику. Определите, к какому дню рождения сумма превысит 100 долларов? Помогите плииз.
Составить программу для решения следующей задачи: Дана последовательность символов,концом которой является точка.Подсчитать,сколько в этой
последовательности букв а. Pascal.Срочно плиз помогите!!!
Составьте программу для решения следующей задачи. Введите с клавиатуры три числа: А, В и С. Если они не равны, то замените все числа
наибольшим из них и выведите результаты на экран. Иначе, найдите и выведите сумму квадратов этих чисел.
. Составьте программу (полный текст программы) для решения следующей задачи. Введите с клавиатуры три числа: А, В, С. Если все они четные, то найдите и
выведите на экран их сумму. Если все они нечетные и A>B>C, то определите и выведите значения наибольшего и наименьшего из чисел. Иначе, выведите числа без изменения. Фрагмент программы: if (a mod 2 = 0) and (b mod 2 = 0) and (c mod 2 = 0) then begin S:=a+b+c; writeln('сумма равна ', S); end; if (a mod 2 <> 0) and (b mod 2 <> 0) and (c mod 2 <> 0) and (a>b) and (b>c) then begin writeln('наибольшее число ', A); writeln('наименьшее число ', C); end else writeln('a= ',a,' b= ', b, ' c= ',c);
1. Продумайте структуру таблицы для решения следующей задачи:В пещере у реки поселился огнедышащий дракон по имени Сергей Михайлович. Всех, кто пытался
его прогнать, он прогонял сам, полыхая огнем. Количество полыханий зависело от того, на кого надо полыхать. На царевича дракон полыхал 5 раз, на королевича — 4 раза, на простого рыцаря — 3. За первые сто лет дракона пытались прогнать 2 царевича, 3 королевича и 5 простых рыцарей. За второе столетие на него покушались 3 царевича, 2 королевича и7 простых рыцарей. За третий век дракона беспокоили 7 царевичей, 5 королевичей и 6 простых рыцарей. За следующее столетие Сергею Михайловичу пришлось иметь дело с 3 царевичами, 6 королевичами и 10 простыми рыцарями. После чего дракона, в конце концов, оставили в покое и объявили гору, на которой он жил, заповедником для охраны редких видов животных.Сколько человек пытались прогнать дракона за каждое из столетий в отдельности и за все 4 века вместе? Сколько среди них было царевичей, сколько королевичей и сколько простых рыцарей? Сколько раз дракону пришлось полыхать на них огнем в течение каждого века и за все 4 столетия вместе? Сколько полыханий досталось царевичам, сколько — королевичам и сколько — простым рыцарям?Введите необходимые формулы и проведите по ним расчеты. Сохраните таблицу в собственной папке под именем Дракон. Помогите пожалуйста!!! Киньте готовую таблицу
Вы находитесь на странице вопроса "составьте программу для решения следующей задачи массив б задан случайным образом подсчитать сумму элементов массива состоящих из нечётных чисел", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.