ivanandrieiev1984268
?>

1) вывести на экран все элементы массива, стоящие на четных местах. 2) найти сумму элементов массива, стоящих на нечетных местах. 3) дан одномерный массив размерностью 15, найти максимальный элемент массива, заменить его числом "0", а затем вывести на экран полученный массив (в строку паскаль

Информатика

Ответы

patersimon1
// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
  a.Where((x,i)->i.IsOdd).Println; // для №1
  Writeln('Сумма =',a.Where((x,i)->i.IsEven).Sum); // для №2
end.

Пример
n= 13
-2 33 -49 49 50 -48 -11 27 47 10 17 22 38
33 49 -48 27 10 22
Сумма =90

№3
begin
  var a:=ArrRandom(15,-99,99); a.Println;
  a[a.IndexMax]:=0; a.Println
end.

Пример
34 -62 -42 98 44 -56 9 -69 85 55 -86 -32 83 -94 -19
34 -62 -42 0 44 -56 9 -69 85 55 -86 -32 83 -94 -19
buriginast5
<html lang="en"><head> <meta charset="UTF-8"> <meta name="viewport" content="width=device-width, initial-scale=1.0"> <meta http-equiv="X-UA-Compatible" content="ie=edge"> <title>Document</title></head><body> <h1>Книги</h1> <a href="#g1">"Тарас Бульба"</a> <a href="#g2">Название книги</a> <a href="#g3">Название книги</a> <p id="g1">Тарас бульба</p> <span>Текст отрывка</span> <img src="Адрес картинки.jpg"> <p id="g2">Название книги название книги</p> <span>Текст отрывка</span> <img src="Адрес картинки.jpg"> <p id="g3"></p> <span>Текст отрывка</span> <img src="Адрес картинки.jpg"></body></html>
Картузов-Алексей1252
Из описания следует, что x,y,z - целые неотрицательные числа.
Слово "Рыбка" выводится всегда, поскольку х либо меньше 6, т.е. равно 0,1,2,3,4,5, либо больше 5, т.е. равно 6,7,8,9,10. Соответственно, слово "Птичка" не будет выведено никогда.
Если y>7 (y=8,9,10), то условие y mod 2 = 3 всегда ложно (остаток от деления на два не может быть равен трем) и поэтому выводится слово "плавает". Если же y<=7, то не выводится ничего.
При z, кратном 3 (z=0,3,6,9) проверяется истинность сложного высказывания (x div 2 > 4) and (x mod 2<>1). Оно истинно если при целочисленном делении х на два получается число большее четырех, т.е. при х=10 и при этом х должен быть четным. И тогда будет напечатано в "пруду". Если же это высказывание ложно, печатается "под облаками".
И в конце выводится точка.
Итак, при значениях x,y,z не превышающих 10:
a) Рыбка плавает в пруду. - x=10, y∈[8,9,10], z∈[0,3,6,9]
b) Птичка летает в пруду. - никогда
c) Птичка под облаками. - никогда
d) Рыбка летает под облаками. - никогда
e) Птичка плавает под облаками. - никогда
f) Рыбка летает. - никогда

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

1) вывести на экран все элементы массива, стоящие на четных местах. 2) найти сумму элементов массива, стоящих на нечетных местах. 3) дан одномерный массив размерностью 15, найти максимальный элемент массива, заменить его числом "0", а затем вывести на экран полученный массив (в строку паскаль
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

pivenraisa
АлексейГагиковна1774
42div8. и скажите что за операция div
Альберт Луиза1595
mantseva
pechinin
alenaya69918
moidela87
Александровна1973
okison2847
igor51766771
lsyrbu
magnit-expo
aniramix
ognevasv555
nata27-73589