Дата публикации:
Информатика задача в паскале. Дан целочисленный массив из 12 элементов, вводимых пользователем с клавиатуры.
Информатика задача в паскале. Дан целочисленный массив из 12 элементов, вводимых пользователем с клавиатуры.
Программа на языке Паскаль для решения данной задачи может выглядеть следующим образом:
program SumOfPositiveElements;
var
a: array[1..12] of integer;
i, sum: integer;
v: integer;
begin
sum := 0;
// Ввод элементов массива с клавиатуры
for i := 1 to 12 do
begin
write('Введите элемент массива a[', i, ']: ');
readln(a[i]);
end;
// Ввод значения v
write('Введите значение v: ');
readln(v);
// Вычисление суммы положительных элементов массива
for i := 1 to 12 do
begin
a[i] := a[i] - v * 3;
if a[i] > 0 then
sum := sum + a[i];
end;
// Вывод результата
writeln('Сумма положительных элементов массива: ', sum);
end.
В данной программе сначала объявляется массив a из 12 элементов и переменные i, sum, v. Затем происходит ввод элементов массива с клавиатуры и значения v. Далее происходит вычисление суммы положительных элементов массива с помощью цикла for. Внутри цикла каждый элемент массива a изменяется по формуле a[i] = a[i] - v * 3, а затем проверяется, является ли он положительным. Если да, то его значение добавляется к переменной sum. В конце программа выводит результат - сумму положительных элементов массива.
Аренда автобуса на 45 мест в Новосибирске
Аренда автобусов для перевозки детей в Екатеринбурге
Аренда автобусов и микроавтобусов в Екатеринбурге
Аренда автобусов в Санкт-Петербурге и Казани
АвтоГЕРМЕС представляет BAIC X35 в Москве
АвтоГЕРМЕС представляет Чанган Алсвин в Москве
Автогидроподъёмники КАМАЗ: Запчасти от производителя
Автомобильные весы ВА-15С: Характеристики и Схема
Автомобильные запчасти Amd: Отзывы пользователей
Без выходных: Тарифы на сайте
Без выходных: Тарифы на сайте
Без выходных! Ведущие врачи у вас дома! Звоните
Цены на рынке: актуальные новости и тенденции
Цены на рынке: Анализ продаж и производства творога
Цены на рынке: обновление на кабель HDMI длиной 7 метров
Цветной портрет на памятнике
Цветные молдинги к панелям ПВХ
Цветные панели ПВХ: Купить в Москве
Цветочные коробки: украшение и упаковка
Цветочные коробки: украшение и упаковка
Досмотровое зеркало для милиции
Досмотровые эндоскопы по выгодной цене!
Ель для праздника: где купить в Москве
Изготовление блистеров на заказ в Москве
Каустическая сода: химическая формула и ее значение
Красноухие черепахи: любят ли они сметану?
Кредит на образование: стоит ли его брать?
Купить электронный блокнот remarkable: плюсы и минусы
Лечение зубов во сне в Москве: миф или реальность?
Лед светильники: современное освещение
Обзор Cisco Catalyst 3650 Series Switches
Отношения с матерью. Как это пережить?
Пансионат "Эдем" в Сочи: Рай для отдыха и релаксации
Пансионат "Энергетик" в Абхазии: Отзывы и Фото
Процентам подачи и разлива напитков в больницах!
The Dragon of Kojima: Who is He?
The Importance of Building Materials in Construction
Заголовок: Лучшие игры на телефон, похожие на Call of Duty
Заголовок: Лучшие места для отдыха в Европе
Заголовок: Лучшие MMORPG игры для выходных дней
Заголовок: Лучшие моменты в игре New Super Mario Bros
Заголовок: Решение уравнения и проверка в математике
Заголовок: "Решение уравнения с помощью корней"
Page 1 of 17 1 2 3 4 5 » ... Last »
