Решить нужно с массива
1)Найти сумму элементов массива, принадлежащих
промежутку от x до y (x и y вводятся с клавиатуры).
2)Дан одномерный массив А1, А2, …, Аn. Верно ли, что
произведение первого и последнего элементов
больше, чем сумма нечетных элементов массива.
244
283
Ответы на вопрос:
Program a; // имя программы var n: string; // четырехзначное число будем вводить с клавы var n1, n2, n3, n4, err: integer; // n1 - n4 это цифры числа, например 1234 var sa: double; // среднее арифметическое begin // начало read( n ); // вводим с клавиатуры число n val( n[1], n1, err ); // первая цифра числа n val( n[2], n2, err ); // вторая цифра числа n val( n[3], n3, err ); // третья цифра числа n val( n[4], n4, err ); // четвертая цифра числа n sa : = ( n1 + n2 + n3 + n4 ) / 4; // находим среднее арифметическое if ( sa / 2 = trunc( sa / 2 ) ) and ( sa > 5 ) then write( sa ); // если оно четное и больше пяти - выдаем значение на экран end. // конец
Популярно: Информатика
-
aigamal11.12.2020 12:11
-
alesa600214.09.2021 07:17
-
miwe1011.04.2022 01:29
-
znatokchok27.10.2020 10:56
-
NastyaKovalenkoo22.04.2022 01:22
-
polinapolina97103.05.2023 06:05
-
krasotka50505004.03.2023 06:49
-
krskapoval26.01.2022 13:58
-
Dasiol22.11.2021 23:39
-
Хомячок22506.04.2022 16:30