Решить задачу на языке программирования Pascal : Найти сумму натуральных четных чисел в промежутке от 1 до 13?

Информатика | 10 - 11 классы

Решить задачу на языке программирования Pascal : Найти сумму натуральных четных чисел в промежутке от 1 до 13.

Если эта сумма больше 15, вывести сообщение "Много!

", в противном случае вывести сообщение "Мало!

".

Ответить на вопрос
Ответы (1)
Na24 3 февр. 2020 г., 09:34:31

Var a : array [1.

100] of longint ; sum, i : longint ;

begin

sum : = 0 ;

for i : = 1 to 13 do begin readln(a[i]) ; sum : = sum + a[i] ; end ;

if sum> ; 15 then writeln('Много') else writeln('Мало') ;

end.

Unicorn10 6 нояб. 2020 г., 23:14:32 | 5 - 9 классы

Дан случайный массив из N чисел, лежащих в промежутке [ - 15 ; 15]?

Дан случайный массив из N чисел, лежащих в промежутке [ - 15 ; 15].

Выписать из него все четные числа, подсчитать их количество.

Если таких чисел нет, то вывести сообщение об этом.

Zhantonina 13 янв. 2020 г., 02:03:15 | 5 - 9 классы

(Pascal) Задача : Ввести массив из 5 элементов с клавиатуры?

(Pascal) Задача : Ввести массив из 5 элементов с клавиатуры.

Вывести элементы на экран и найти их сумму.

РЕШИТЕ ПОЗЯЗЯ!

Dzugaevzhora51 28 июн. 2020 г., 11:26:34 | 10 - 11 классы

Создать массив целых чисел, найти сумму четных элементов массива, результат вывести на экран?

Создать массив целых чисел, найти сумму четных элементов массива, результат вывести на экран.

Danhek32 14 сент. 2020 г., 13:24:15 | 10 - 11 классы

Водится 2 числа, вывести сумму цифр первого, если оно больше второго и произведение четных цифр второго числа в противном случае(pascal)?

Водится 2 числа, вывести сумму цифр первого, если оно больше второго и произведение четных цифр второго числа в противном случае(pascal).

Barelina 12 февр. 2020 г., 16:44:37 | 5 - 9 классы

Задача 1?

Задача 1.

Вывести на экран квадраты чисел от 11 до 27 .

Задача 2.

Найти произведение четных чисел в промежутке от 23 до 5.

Задача 3.

Найти сумму двухзначных чисел кратных 7.

Hrytskivng 25 февр. 2020 г., 15:51:02 | 5 - 9 классы

Найти и вывести на экран сумму нечетных чисел от 1 до 10?

Найти и вывести на экран сумму нечетных чисел от 1 до 10.

Найти и вывести на экран квадраты чисел от 1 до 9.

Найти и вывести на экран произведение чисел от 5 до 12.

Найти и вывести на экран сумму первых десяти чисел.

Зарание спасибо!

Valya196 26 дек. 2020 г., 02:36:41 | 5 - 9 классы

Помогите пожалуйста?

Помогите пожалуйста.

Работа по программированию : "Условный оператор" Составить блок - схему и программу к задаче : В компьютере вводят два числа.

В случае, если делитель равен 0, вывести сообщение "На ноль делить нельзя!

" Иначе, найти и вывести частное этих чисел.

Валерия123123 20 июл. 2020 г., 11:14:21 | 10 - 11 классы

С клавиатуры вводятся 3 числа?

С клавиатуры вводятся 3 числа.

Найти количество и сумму четных чисел среди них.

Если среди введенных четных нет, то вывести соответствующее сообщение.

ТаткаТаточка 3 мая 2020 г., 01:57:08 | 5 - 9 классы

С клавиатуры вводится 5 - значное число?

С клавиатуры вводится 5 - значное число.

Если первая и последняя цифры этого числа четные, вывести на экран "четные", в противном случае вывести "нечетные" помогите пж.

Masha050781 18 апр. 2020 г., 00:58:51 | 5 - 9 классы

Вывести сумму первых 25 натуральных чисел?

Вывести сумму первых 25 натуральных чисел.

Вы перешли к вопросу Решить задачу на языке программирования Pascal : Найти сумму натуральных четных чисел в промежутке от 1 до 13?. Он относится к категории Информатика, для 10 - 11 классов. Здесь размещен ответ по заданным параметрам. Если этот вариант ответа не полностью вас удовлетворяет, то с помощью автоматического умного поиска можно найти другие вопросы по этой же теме, в категории Информатика. В случае если ответы на похожие вопросы не раскрывают в полном объеме необходимую информацию, то воспользуйтесь кнопкой в верхней части сайта и сформулируйте свой вопрос иначе. Также на этой странице вы сможете ознакомиться с вариантами ответов пользователей.