Информатика | 10 - 11 классы
Помогите пожалуйста решить задачу в Pascal вот Задача : Заполните с клавиатуры массив К, состоящий из N элементов.
Найдите произведение четных элементов.
Если сделаете отправьте скриншотом из паскаль.
Задачи по Pascal помогите1)Дан массив из конечного числа элементов вывести все отрицательныеэлементы?
Задачи по Pascal помогите
1)Дан массив из конечного числа элементов вывести все отрицательные
элементы.
2)Дан одномерный массив найти все четные элементы массива.
3)Дано n целых чисел найти произведение элементов одномерного массива.
4)Упорядочить данную последовательность по убыванию элементы вводятся с клавиатуры 5)Массив задан датчиком случайных чисел на интервале от - 31 до 45 сформировать новый массив b состоящий из нечетных элементов массива a.
Помогите с задачей на паскалеДан одноименный массив А?
Помогите с задачей на паскале
Дан одноименный массив А.
Определить среднее арифметическое положительных и четных элементов больших 6.
Заполнить массив из 15 элементов целыми числами с клавиатуры, и вывести на экран те элементы, у которых номер совпадает со значениемВ паскале?
Заполнить массив из 15 элементов целыми числами с клавиатуры, и вывести на экран те элементы, у которых номер совпадает со значением
В паскале.
Помогите с задачей на паскале Дан одноименный массив А?
Помогите с задачей на паскале Дан одноименный массив А.
Определить среднее арифметическое положительных и четных элементов больших 6.
Дан массив целых чисел, состоящий из 30 элементов?
Дан массив целых чисел, состоящий из 30 элементов.
Заполнить его любым удобным для вас способом.
Найти : Суму элементов массива, имеющих четное значение ; Вывести количество элементов, значения которых больше заданного числа А (А вводится с клавиатуры).
Ввести с клавиатуры массив из 5элементов, найти в нем два максимальных элемента и их номера?
Ввести с клавиатуры массив из 5
элементов, найти в нем два максимальных элемента и их номера.
Pascal ABC
ПОЖАЛУЙСТА ДЕЛАЙТЕ КАК МОЖНО ПРОЩЕ.
Задача 1?
Задача 1.
Заполнить массив из 10 элементов случайными значениями от 0 до 100.
Вывести на экран сумму четных элементов массива.
Задача 2.
Заполнить массив значение с клавиатуры (5 элементов) сумму минимального и максимального элемента.
Решите задачу в системе Паскальсформировать массив и напечатать одномерной массой в состоящий из 10 чисел элементы вводятся с клавтатуры числа целые?
Решите задачу в системе Паскаль
сформировать массив и напечатать одномерной массой в состоящий из 10 чисел элементы вводятся с клавтатуры числа целые.
Pascal введите с клавиатуры массив m из n элементов целого типа, нумерация элементов начинается с 1 и найти произведение четных элементов?
Pascal введите с клавиатуры массив m из n элементов целого типа, нумерация элементов начинается с 1 и найти произведение четных элементов.
Входные данные n = 5 1 2 3 4 5 выходные данные 8.
Pascal введите с клавиатуры массив m из n элементов целого типа, нумерация элементов начинается с 1 и найти произведение четных элементов?
Pascal введите с клавиатуры массив m из n элементов целого типа, нумерация элементов начинается с 1 и найти произведение четных элементов.
Входные данные n = 5 1 2 3 4 5 выходные данные 8.
Вы зашли на страницу вопроса Помогите пожалуйста решить задачу в Pascal вот Задача : Заполните с клавиатуры массив К, состоящий из N элементов?, который относится к категории Информатика. По уровню сложности вопрос соответствует учебной программе для учащихся 10 - 11 классов. В этой же категории вы найдете ответ и на другие, похожие вопросы по теме, найти который можно с помощью автоматической системы «умный поиск». Интересную информацию можно найти в комментариях-ответах пользователей, с которыми есть обратная связь для обсуждения темы. Если предложенные варианты ответов не удовлетворяют, создайте свой вариант запроса в верхней строке.
Const
m = 1000 ;
var
k : array[1.
M]of integer ;
i, n : integer ;
p : real ;
begin
p : = 1 ; writeln('INPUT n') ; readln(n) ; for i : = 1 to n do begin read(k[i]) ; {массив вводится через пробел, последний элемент Enter} if k[i]mod 2 = 0 then p : = p * k[i] ; end ;
writeln ;
writeln('p = ', p : 4 : 0) ;
end.