Александра Викторович531

01.03.2021

Напишите программу, которая в последовательности натуральных чисел определяет количество и сумму всех чисел, кратных 7 и оканчивающихся на 2.

Информатика

Ответить

Ответы

poiskmarina

01.03.2021

Program M1;

var s,x:integer;

begin

s:=0;

x:=1;

while x<>0 do

begin

read(x);

if (x mod 7=0) and (i mod 10=0) then s:=x+s;

end;

writeln('summa=',s);

end.

Объяснение:

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

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

Напишите программу, которая в последовательности натуральных чисел определяет количество и сумму всех чисел, кратных 7 и оканчивающихся на 2.

▲

Напишите программу, которая в последовательности натуральных чисел определяет количество и сумму всех чисел, кратных 7 и оканчивающихся на 2.

Ответы

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

Ваше имя (никнейм)*

Email*

Комментарий*

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

Составьте схему передачи информации: кодирующее устройство, декодирующее устройство, источник, приемник , канал связи.

Как число 2002 перевести в двоичный код?

Системы оптического распознавания документов

Что можно сделать с программы архиватор?

Дан текстовой документ. Определи, есть ли колонтитул на странице документа. Выбери правильный ответ. 3.png есть колонтитул нет колонтитула

Print(...) не понимаю какую писать

Ниже на пяти языках программирования записаны две рекурсивные функции: f и g паскаль function f(n: integer): integer; begin if n > 1 then f : = f(n - 1) + g(n - 1) else f : = n; end; function g(n: ...

Какой рисунок создан с применением инструмента «Магия – Цвета радуги»? Рис. 1Рис. 2Рис. 3Рис. 4

Камень падает с высоты 20м. Вычислите время его падения. Составить алгоритм методом блок- схемы и словесным методом.

Напишите программу, которая в последовательности натуральных чисел определяет количество и сумму всех чисел, кратных 7 и оканчивающихся на 2.

Ответы

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

Ваше имя (никнейм)*

Email*

Комментарий*

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

Составьте схему передачи информации: кодирующее устройство, декодирующее устройство, источник, приемник , канал связи.

Как число 2002 перевести в двоичный код?

Системы оптического распознавания документов

Что можно сделать с программы архиватор?

Дан текстовой документ. Определи, есть ли колонтитул на странице документа. Выбери правильный ответ. 3.png есть колонтитул нет колонтитула

Print(...) не понимаю какую писать​

Ниже на пяти языках программирования записаны две рекурсивные функции: f и g паскаль function f(n: integer): integer; begin if n &gt; 1 then f : = f(n - 1) + g(n - 1) else f : = n; end; function g(n: ...

Какой рисунок создан с применением инструмента «Магия – Цвета радуги»? Рис. 1Рис. 2Рис. 3Рис. 4​

Камень падает с высоты 20м. Вычислите время его падения. Составить алгоритм методом блок- схемы и словесным методом.

Print(...) не понимаю какую писать

Ниже на пяти языках программирования записаны две рекурсивные функции: f и g паскаль function f(n: integer): integer; begin if n > 1 then f : = f(n - 1) + g(n - 1) else f : = n; end; function g(n: ...

Какой рисунок создан с применением инструмента «Магия – Цвета радуги»? Рис. 1Рис. 2Рис. 3Рис. 4