Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

составте программу, которая

5-9 класс

заполняет масив а[1..10] случайными целыми числами в диапазоне от 1 до 10 и находит сумму элементовс нечетными значениями

Bhu 13 апр. 2013 г., 0:48:02 (11 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Danilkuvaev
13 апр. 2013 г., 1:53:21 (11 лет назад)

var a:array[1..10]of integer;
     i,s:integer;
begin
 write('nachalni massiv:');
 for i:=1 to 10 do
  begin
   a[i]:=random(10)+1;
   write(a[i],' ');
   if a[i] mod 2=1 then s:=s+a[i];
  end;
 writeln;
 write('summa:',s);
end.

Ответить

Другие вопросы из категории

написать программу определения стоимости разговора по телефону с учетом скидки 20% представляемой по субботам и воскресениям.

Вид экрана:
вычисление стоимости разговора по телефону (2р. - 1мин)
введите исходные данные
длительность разговора (целое число минут) 3
день недели ( 1-пон .... 7-воскр)? 6
предостовляется скидка 20%
стоимость разговора 4.80р

Напишите программу заполнения одномерного массива любым способом и

найдите сумму всех элементов.

Читайте также

Помогите по программе paskal : 1.дано целое число.напишите программу которая уменьшает на 2 модуль этого числа и выводит на экран монитора

результат

2.дано целое число.напишите,программу которая выводит на экран последнюю цифру данного числа,затем возводит ее в квадрат и выводит на экран монитора результат

1. Написать программу, которая спрашивает «Который час?» и, в зависимости от введенного времени, выводит на экран приветствие: «Доброе утро», «Добрый

день», «Добрый вечер», «Спокойной ночи».
2. Составьте программу, которая вычисляет оптимальный вес пользователя, сравнивает его с реальным весом и выдает рекомендации о необходимости поправиться или похудеть. Оптимальный вес вычисляется по формуле: рост (в сантиметрах) – 100.
Помогите решить 2 задачи

составьте программу, которая вставляет слово ОБА после каждого слова, заканчивающегося на гласную.

Или

составьте программу, которая определяет на сколько в строке S слов, начинающихся на главную букву больше, чем в строке T

надо решить одну из них

1)Составьте программу,которая заполняет массив e[1..11] случайными целыми числами в диапазоне от -15 до 1 и находит количество элементов кратных 5.

2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.

1)напишите программу которая спрашивала бы название продукта и его цену. И затем на экран выводила фразу "Ваши расходы на покупки равны руб." 2) написать

программу, которая запрашивала три числа, подсчитывала их средне и сумму и на экран выводила фразу "Их среднее равно..." и "Их сумма равна..."



Вы находитесь на странице вопроса "составте программу, которая", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.