Задача на паскале Задан массив А размерности N случайным образом.
5-9 класс
|
Нужно сформировать новый массив по следующему правилу:
все чётные элементы разделить на 2, все нечётные оставить без изменения
const n=10;
var a,b: array of integer;
i : integer;
begin
for i:=1 to n do
begin
a[i]:=random(20)-10;
write(a[i]:4);
end;
for i:=1 to n do
if a[i] mod 2=0 then b[i]:=a[i] div 2
else b[i]:=b[i];
writeln;
for i:=1 to n do
write(b[i]:4);
end.
Другие вопросы из категории
Помогите пожалуйста.
Читайте также
Задан массив случайным образом. Преобразовать его след. образом:
каждого года XX века?
2)Вы приобрели котёнка.Каждый вечер вы определяете его вес с помощью весов.Как можно описать на Паскале массив,в котором будет храниться значения веса котёнка в течение месяца (например,мая)?
их 4 штуки!
1.дан массив тз N элементов. Есть ли в нем чётные элементы, которые кратны заданному числу K.
2. Дан массив из Nэлементов. Посчитать, сколько элементов массива равных минемальному.
3. Сформировать массив из Nэлементов: 10 12 16 22 30 40.
4. Дан массив из Nэлементов. Перемножить минемальные элементы на 2.
Heeelp!
элементов массива.
3)задан массив из 9 целых чисел.Вывести на экран чётные элементы