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

Дан массив A[1..10] заменить четные элементы этого массива на их квадрат.

5-9 класс

Решение нужно для 9 класса на pascalABC

Karateso 04 дек. 2014 г., 1:24:36 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
котэ2001
04 дек. 2014 г., 3:43:52 (9 лет назад)

var a:array[1..1000] of integer;
i,n:integer;
begin
randomize;
write('Введите количество элементов массива n='); readln(n);
for i:=1 to n do begin
a[i]:=random(100)-40; write (a[i],' '); end;
writeln('Новый массив: ');
for i:=1 to n do 
if mod 2 = 0 then a[i]:=sqr(a[i]);
for i:=1 to n do 
write(a[i],' '); ;
end.

Ответить

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

Петя и Коля играют в следущую игру. Петя задумывает натуральное число, не превосходящее 8. Коля должен это число отгадать. Он может задавать Пете вопросы,

допускающие только ответы "да" или "нет". Коля старается за наименьшее число вопросов отгадать число, задуманное Петей. Его стратегия основана на делении числового интервала пополам и выяснении, в какой из половин находится задуманное число.

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

1)дан массив. найти сумму положительных и нечетных и количество отрицательных четных элементов

2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.

Решить задачи на языке программирования в Turbo Pascal: 1) Дан массив, состоящий из 10 чисел, значения могут быть

от -100 до 100. Определить минимальное положительное число.

2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.

1.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами до 50. Найти сумму всех четных элементов массива и их количество.

2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.

1. Дан массив А из 10 элементов, которые заполняются случайным образом, числам от 0 100. Выведите массив на экран и найдите максимальный элемент массива.

2. Создать массив A из 10 элементов, заполненный случайным образом числами принадлежащих промежутку (0;20). Вывести полученный массив на экран. Вычислить количество элементов массива, значения которых не превышают среднее арифметическое значений его элементов.

1.Дан массив целых чисел, найти среднее арифметическое всех элементов массива.

2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.



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