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

Задан массив из 10 случайных целых чисел от 0 до 50 . Увеличить в 2 раза элементы массива кратные 5, остальные элементы массива уменьшить в 2 раза.

5-9 класс

Lagotinanton 29 янв. 2014 г., 16:47:22 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
пчелёнок
29 янв. 2014 г., 19:15:40 (10 лет назад)

uses crt;
var a=array[1..10] of integer;
i:integer;
begin
randomize;
for i:=1 to 10 do begin
a[i]:=random(50);
if (a[i]mod5=0) there 
a[i]:=a[i]*2;
else
a[i]:=a[i]/2;
for i:=1 to 10 do
writeln(a[i]);
end.

Ответить

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

составть программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет:

а) среднее арифметическое нечетных чисел
б) сумму чисел, не превышающих 10
в сумму чисел, кратных 3
На экран выводятся исходные значения и результаты вычислений
Плиз помогите, завтра здать нужно((

Установите соответсвие между компьтерными и аналогичными им некомпьютерными объектами.

Имя файла Библиотека
Файл Шкаф
Папка Полка
Диск Книга
Вложенна папка Название книги

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

Составьте программу, которая формирует массив из 40 случайных целых чисел от 2 до 20 и вычисляет: а) среднее арифметическое нечётных чисел

>б) сумму чисел, не превышающих 10

в) сумму чисел, кратных трём

плииз, каждую задачу отдельно.. если не уверенны не пишите.. срочно!!

5-9 класс информатика ответов нет
Даны два целых числа А и В (А < В) . Найти произведение всех целых чисел от А до В включительно.

Входные данные: ввести два целых числа А,В (1 <=А,В<=10).
Входные данные: вывести произведение всех целых чисел от А до В включительно.

составть программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет:

а) среднее арифметическое нечетных чисел
б) сумму чисел, не превышающих 10
в сумму чисел, кратных 3
На экран выводятся исходные значения и результаты вычислений
Плиз помогите, завтра здать нужно((

Помогите,пожалуйста,написать программу по информатике.Вот такое условие:

Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет:
1). сумму чисел, не превышающих 10;
2). сумму чисел,кратных 3. Помогите пожалуйста,написать эту программу на PaskalABC.



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