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

1. Дан массив. Напечатать:а) Все четные1. Дан массив. Напечатать:

10-11 класс

а) Все четные элементы
б) Все элементы, оканчивающиеся нулем.

2. В массиве хранится информация о количестве осадков, выпавших каждый день января. Определить, в какие числа месяца осадков не было.

Паскаль.

Annechek99 18 сент. 2014 г., 11:53:44 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
адскийПАРЕНЬ
18 сент. 2014 г., 14:18:25 (9 лет назад)

program gt;
var a:array[1..100]of integer;
n,i:integer;
begin
read(N);
for i:=1 to n do
read(a[i]);
write('чётные числа ');
for i:=1 to n do
if(a[i] mod 2=0)then write(a[i],' ');
writeln;
write('числа оканчивающиеся нулем ');
for i:=1 to n do
if(a[i] mod 10=0)then write(a[i],' ');
end.
2)
program gt;
var a:array[1..1000]of integer;
n,i:integer;
begin
read(N);
for i:=1 to n do
read(a[i]);
for i:=1 to n do
if(a[i]=0)then write(i,' ');
end.

Ответить

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

Люди помогайте!!!))) Паскаль!!!

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

2)Составьте программу заполнения массива из десяти чисел следующими значениями
а) 2 4 6 8 10 (+ 2)
б)3 6 9 12 15 (+3)

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

Паскаль. 12.Дан массив А(3*4). Найти сумму первых отрицательных элементов в каждом столбце. 13.Даны два массива А(3*3)

и В(3*3). Вывести на экран тот из них, у которого меньше сумма элементов главной диагонали.

17.Дан массив А(3*4). Заменить все отрицательные элементы на противоположные.

Составить программу Дан массив натуральных чисел , размерность -12 !) Заполнение массива производить с клавиатуры 2) Вывести на печать

только элементы кратные 2

3)Найти сумму первых пяти элементов

Составить программу Дан массив целых чисел , размерность -12

1) Заполнение массива производить случайными числами из диапозона [-10;35]

2)Вывести на печать только положительные элементы

3)Найти количество отрицательных элементов

Составить программу

Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .

№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от 0 до 100. Напишите программу, которая позволит найти сумму

двузначных элементов массива, которые не оканчиваются на 3. №2. Дан массив из 100 элементов. Каждый элемент может принимать целочисленные значения от 1 до 500. Напишите программу, которая позволит найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка.

№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от -100 до 100. Напишите программу, которая позволит

подсчитать среднее арифметическое положительных элементов массива, которые кратны первому элементу массива. №2. Дан массив из 40 элементов. Каждый элемент может принимать целочисленные значения от 0 до 200. Напишите программу, которая позволит найти наиболее часто встречающийся элемент массива



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