М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
shahmir2406
shahmir2406
24.07.2020 12:02 •  Информатика

написать программу в паскале: надо заполнить массив случайными числами в диапазоне от 25 до 50, найти сумму четных чисел и их количество.

👇
Ответ:
demoplus1
demoplus1
24.07.2020
// PascalABC.NET 3.2, сборка 1457 от 29.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),25,50); a.Println;
  var s:=a.Where(x->x.IsEven);
  Writeln('Четных чисел- ',s.Count,', их сумма равна ',s.Sum)
end.

Пример
n= 17
47 35 50 48 27 49 34 41 44 25 37 31 35 31 41 50 32
Четных чисел- 6, их сумма равна 258
4,5(81 оценок)
Ответ:
380974769507p06wmj
380974769507p06wmj
24.07.2020
Begin
  var a := arrrandom(readinteger('Введите размер массива:'), 25, 50).println;
  writeln('Кол-во четных чисел:', a.where(x -> x mod 2 = 0).count);
  writeln('Сумма четных чисел:', a.where(x -> x mod 2 = 0).sum);
end.
4,6(46 оценок)
Открыть все ответы
Ответ:
julianna19
julianna19
24.07.2020

Объясню на примере первой задачи.

Перед нами написана программа (алгоритм) на языке псевдокода.

В начале программы объявляются переменные, с которыми мы будем работать. В данном случае, объявляются переменные s и n целочисленного типа (цел). Дальше идет присвоение переменной s значения 1. нц говорит о том, что дальше идет цикл. Каждую его итерацию (шаг) будет выполняться его тело (все, что между нц и кц).  Конструкция для x от n до m говорит о том, что каждую итерацию переменная x будет увеличиваться на единицу (если указан шаг, т.е. конструкция выглядит так: для x от n до m шаг y, то будет увеличиваться на y) от числа n до числа m. Как только x будет равна m, цикл прекратится и будут выполняться действия после него. В нашем случае переменной n присваивается 3, выполняется тело s:=s*3. Т.е. после этого шага s будет равна 9. Теперь новая итерация. Переходим в начало цикла. Переменной n присваивается 4 (в предыдущий раз было 3). И опять выполняется действие s:=s*3. s становится равной 27. Потом опять новая итерация. И так далее. Когда n будет равна 5 ,то произойдет последняя итерация. Дальше пойдет вывод s, который после 4 итераций (n от 2-х до 5-ти включительно) будет равна 81.

Итерации более детально:

1. n = 2; s = 1*3 = 3

2. n = 3; s = 3*3 = 9

3. n = 4; s = 9*3 = 27

4. n = 5; s = 27*3 = 81

Все, цикл завершился.

ответы:

1) 81

2) 50

Итерации более детально:

1. n = 3; s = 0+2*3 = 6

2. n = 4; s = 6+2*4= 14

3. n = 5; s = 14+2*5 = 24

4. n = 6; s = 24+2*6 = 36

5. n = 7; s = 36+2*7 = 50

3) 13

4) 11

5) 121

6) 120

7) 38

8) 20

9) 40

Заметим, что в данной задаче указан шаг (step 2). Это значит, что каждую итерацию k будет увеличиваться не на 1-цу, а на 2-ку.

Итерации более детально:

1. k = 6; s = 0+10 = 10

2. k = 8; s = 10+10 = 20

3. k = 10; s = 20+10 = 30

4. k = 12; s = 30+10 = 40

4,4(88 оценок)
Ответ:
fbejgiwndkgk
fbejgiwndkgk
24.07.2020

Есть относительные ссылки, когда столбцы и строки меняются в зависимости от ячейки: A1 (A4+A2) --> B1 (B4+B2); C2 (B3+A1) --> C5(B6+A4); A2(B4) --> B4(C6).

А есть абсолютные ссылки, когда столбец строка или вся ячейка не изменяются, в зависимости от того где стоит знак $. A1($A3) --> C4 ($A6); A2 (B$3) --> B4 (C$3); A1 ($B$6) --> F20 ($B$6).

Теперь просто ответы:

B) =C6+D$1B)= C1*$B2C) = $A1*D2C)=В5*С$2C)= $C2+F3c. B$5a. $B52. 5+2 это просто текст, текст и будет в ячейкеc) 5*(A2+C3)/(3*(2*B2-3*D3)) арифметические знак ставить надо, а у знака : другое обозначение. d) =A2*A3-A4a) не изменяютсяd) преобразуются в зависимости от нового положения формулы. c) =$A$1*A3+B3d) 30 т.к. 20+20/2 = 30b) 140 т.к. мы посчитали сумму от ячейки A1 до ячейки A7 включая концы, а затем поделили на 2.
4,8(39 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ