9. дан массив a(1..n), где n – нечётное чмсло. если средний элемент массива больше следующего за ним элемента, то среднему элементу присвоить значение 1, если они равны, среднему элементу присвоить значение 0, иначе среднему элементу присвоить значение среднего арифметического последнего и предпоследнего элементов массива.
244
411
Ответы на вопрос:
pascalabc.net
№1
begin
var n : = readinteger;
var a : = seqrandomreal(n, -99, 99).select(p -> round(p,;
a.println;
var ic : = n div 2;
if a[ic] > a[ic+1] then
a[ic] : = 1
else if a[ic] = a[ic+1] then
a[ic] : = 0
else
a[ic] : = (a[n-1] + a[n-2])/2;
a.println
end.
№2
begin
var (a, x) : = readreal2('введите а и х: ');
var y: real;
if x < 0 then
y : = 2 + x
else if x = 0 then
y : = 3 * a - 1
else
y : = a + x;
print(y)
end.
Популярно: Информатика
-
RedGirl1217.01.2020 10:34
-
inkognit123456703.04.2022 02:54
-
Варежкамяу03.11.2021 05:33
-
Tanya22rus24.10.2021 20:37
-
555Sofia55529.07.2021 14:15
-
пингвиниха2017201808.02.2023 03:34
-
Dangerrr16.08.2020 03:25
-
Катюшкавасилек26.06.2023 11:42
-
Дианчик77701.09.2022 13:14
-
Resh4tor133711.04.2022 05:05