сервис вопросов и ответовДан массив d(n).Заменить элементы массива кратные 3 на их удвоеное произведение.
10-11 класс|
|
Megakrail
13 дек. 2016 г., 18:22:32 (7 лет назад)
DIP22
13 дек. 2016 г., 20:53:13 (7 лет назад)
program xxx;
var i, n : integer
d : array[1..30] of real;
begin
write ('введите разметность массива n=');
readln(n);
writeln(''введите элементы массива d:');
for i:=1 to n do
readln(d[i]);
writeln ('исходный массив D:');
for i:=1 to n do
write(d[i]);
for i:=1 to n do
if d[i] mod 3 = 0 then d[i]:= 2 * d[i];
writeln ('полученный массив D:');
for i:=1 to n do
write(d[i]);
readln
end.
Ответить
Другие вопросы из категории
Какой
объём памяти на диске требуется для
записи 5 страниц текста набранного на
компьютере, если каждая страница содержит
30 строк по 70 символов в строке?
У Азизхана есть строка S. Его интересует сколько есть подстрок четной длины у строки S, которые являются палиндромами. Одинаковые подстроки начинающие с
разных позиций считаются разными.
Формат входных данных
Единственная строка входного файла содержит одну строку S состоящее из строчных букв английского алфавита (1 <= длина S <= 100000).
как мне выучить паскаль. подскажите пожалуйста легкую для изучения и вообще крутую
Даю 10балов поэтом пожалуйста всякую фигню не писать
Читайте также
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Опишите на русском языке или на одном из языков
программирования алгоритм, позволяющий найти и вывести сумму элементов массива, кратных тринадцати. Гарантируется, что в исходном массиве есть хотя бы один элемент, значение которого делится на тринадцать. Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.
const N=30;
var a: array [l..N] of integer;
i,j,s: integer;
begin
for i:=l to N do readln(a[i]);
...
end.
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от -100 до 100. Напишите программу, которая позволит
подсчитать среднее арифметическое положительных элементов массива, которые кратны первому элементу массива. №2. Дан массив из 40 элементов. Каждый элемент может принимать целочисленные значения от 0 до 200. Напишите программу, которая позволит найти наиболее часто встречающийся элемент массива
дан целостный массив из 30 элементов. элементы массива могут принимать целые значения от 0 до 100 опишите на русском языке или одном из языков
программирования алгоритм позволяющий найти и вывести номер элемента массива имеющего максимальное значение сре элементов массива которые делятся на 3 и кратны 5
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от 0 до 100. Напишите программу, которая позволит найти сумму
двузначных элементов массива, которые не оканчиваются на 3. №2. Дан массив из 100 элементов. Каждый элемент может принимать целочисленные значения от 1 до 500. Напишите программу, которая позволит найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка.
Дан массив V[15] целочисленных элементов. Определить: 1)произведение элементов, занимающих 1,6,11 места в массиве. 2)сумму
элементов, занимающих четные места в массиве.
3)сформировать новый массив K [10] из элемаентов с 1 по 10 по формуле: K[i]=V[i]*2.
4)определить максимальный элемент массива K, его порядковый номер.
нужна программа, написанная, на языке програмирования Pascal.
Вы находитесь на странице вопроса "Дан массив d(n).Заменить элементы массива кратные 3 на их удвоеное произведение.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.