сервис вопросов и ответовДан массив из 20 целых чисел,все элементы меньше 10 заменить на 0, и вывести получившиеся массив
10-11 класс|
|
Dilara21792
28 сент. 2016 г., 11:35:28 (7 лет назад)
Patapata989
28 сент. 2016 г., 13:28:57 (7 лет назад)
program qq;
uses crt;
var A:array [1..20] of integer; i: integer;
begin
for i:=1 to 20 do
readln (a[i]); //ввод массива. Не указали откуда дан массив, так что введем его через enter
for i:=1 to 20 do
if a[i]<10 then
a[i]:=0; //сравним каждый элемент массива с 10. если меньше 10, то заменим на ноль
for i:=1 to 20 do
write (a[i], ' '); //Вывод массива на экран
end.
Ответить
Другие вопросы из категории
написать программу вычисления значения функции
x^2 x>5
y= 17x-1 npи -7<х<=5
25 при x<=-7
Составьте программу, проверяющую, верно ли
утверждение, что введенное вами целое число делится без остатка на 3
Составте программу на Pascal. Сколько существует (невырожденных) треугольников периметра N с целыми длинами сторон? (Треугольник со сторонами
a,b,c называется невырожденным, если из отрезков длины a,b,c его можно составить.)
Входные данные. С клавиатуры вводится число N (1<=N<=1000)
Выходные данные. Программа выводит число таких треугольников.
Читайте также
Сделайте пожалуйста блок-схему или код в small basic. Дан массив из 20 целых чисел. В массиве хранятся результаты соревнований по спортивной стрельбе.
Один элемент массива соответствует количеству очков, набранных одним участником соревнований, и имеет значение от 0 до 30 включительно. Необходимо разработать программу, которая по данным массива вычисляет максимальное количество очков среди участников соревнований, и количество участников набравшее зачётное количество очков. Зачётное количество очков 18. Гарантируется, что хотя бы один участник соревнований набрал зачётное количество очков.
на языке паскаль 1)дан массив натуральных чисел найдите сумму всех его элементов 2)вычислить количество положительных чисел
среди 10 элементов вещественного массива
3)заполнить массив из n целых чисел.выяснить какое число встречается раньше-положительное или отрицательное.
4)в целочисленном массиве есть отрицательные элементы.вывести номера этих элементов
1)дан массив натуральных чисел найдите сумму всех его элементов 2)вычислить количество положительных чисел среди 10 элементов вещественного
массива
3)заполнить массив из n целых чисел.выяснить какое число встречается раньше-положительное или отрицательное.
4)в целочисленном массиве есть отрицательные элементы.вывести номера этих элементов
№1. Дан массив из 30-ти элементов. Каждый элемент может принимать целочисленные значения от 0 до 100. Напишите программу, которая позволит найти сумму
двузначных элементов массива, которые не оканчиваются на 3. №2. Дан массив из 100 элементов. Каждый элемент может принимать целочисленные значения от 1 до 500. Напишите программу, которая позволит найти и вывести минимальное значение среди элементов массива, которые делят максимальное значение элементов массива без остатка.
Вы находитесь на странице вопроса "Дан массив из 20 целых чисел,все элементы меньше 10 заменить на 0, и вывести получившиеся массив", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.