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

Дана непустая последовательность целых чисел, оканчивающихся нулём. Найди сумму чисел последовательности больших числа x​

👇
Ответ:
selenagulya2002
selenagulya2002
27.11.2021

var x, sum, i, k:Integer;

begin

sum:=0;

readln(x);

for i := 1 to 30000 do

begin

  readln(k);

  if k = 0 then

  begin

   break;

  end;

  if k > x then

  begin

    sum:=sum+k;

   end;  

 end;  

 writeln(sum);

end.

4,8(100 оценок)
Открыть все ответы
Ответ:
сабо3
сабо3
27.11.2021

1) a := 4;  

b := 6;

b := 8 + a * b;

a := b / 4 * a.

а = 4

b = 6

b = 8 + 4 * 6 = 32

a = 32 / 4 * 4 = 32 / 16 = 2

2) a := 3;

b := 6;

b := 12 + a * b;

a := b / 5 * a.

a = 3

b = 6

b = 12 + 3 * 8 = 30

a = 30 / 5 * 3 =  6 * 3 = 18

3) a := 8;

b := 8 + a / 2;

a := a – b / 2.

a = 8

b = 8 + 8 / 2 = 12

a = 8 - 12 / 2 = 8 - 6 = 2

4) a := 2;

b := 6;

b := 12 + a * b;

a := b / 4 * a.

a = 2

b = 6

b = 12 + 2 * 6 = 12 + 12 = 24

a = 24 / 4 * 2 = 6 * 2 = 12

5) a := 3;

b := 8 + 2 * a;

a := b / 2 * a.

a = 3

b = 8 + 2 * 3 = 8 + 6 = 14

a = 14 / 2 * 3 = 7 * 3 = 21

6) f := 21;

e := 10;

f := 5 * f + 5;

e := f – 10 – e * 5.

f = 21

e = 10

f = 5 * 21 + 5 = 105 + 5 = 110

e = 110 - 10 - 10 * 5 = 100 - 50 = 50

7) a := 14;

b := 4;

a := a / 2 - b;

b := (a * b) / 2;

b := a + b

a = 14

b = 4

a = 14 / 2 - 4 = 7-4 = 3

b = ( 3 * 4) / 2 = 12 / 2 = 6

b = 3 + 6 = 9

8) b := 5;

a := -3;

a := 7 + a * b;

b := a / 2 + b

b =5

a = -3

a = 7 + (-3 * 5) = 7 + (-15) = -8

b = -8/2 + 5 = -4 +5 = 1

9) a := 4;

b := 5;

a := b + 15;

b := 100 / a * 4.

a = 4

b = 5

a = 5 + 15 = 20

b = 100 / 20 * 4 = 5 * 4 = 20

10) b := 8;

a := 10;

b := b + a * 2;

a := 29 - a;

b = 8

a = 10

b = 8 + 10 * 2 = 8 + 20 = 28

a = 29 - 10 = 19;

Объяснение:

4,7(18 оценок)
Ответ:
M1N1G4M3R1
M1N1G4M3R1
27.11.2021
#include <iostream>
#include <vector>
using namespace std;

int main() {
cout << "Введите вектор (0, чтобы закончить):\n";
float in;
vector<float> a;
while (true) {
cin >> in;
if (in == 0)
break;
else
a.insert(a.end(), in);
}
float p, x, y;
cout << "x = ";
cin >> x;
cout << "y = ";
cin >> y;
p = 1;
for (int i = 0; i < a.size(); i++) {
if ( (a[i] >= x) && (a[i] <= y) )
p *= a[i];
}
cout << "p = " << p << '\n'
<< "a[]:";
for (int i = 0; i < a.size(); i++) {
cout << a[i] << ' ';
}
return 0;
}
4,7(7 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ