mar77873

19.07.2021

С клавиатуры вводится 8 целых чисел. С цикла for найди количество положительных чисел

Информатика

Ответить

Ответы

Darya Aleksei1173

19.07.2021

for I:=1 to 8 do

read(a[I]);

b:=0;

for I:=1 to 8 do

if (a[I]mod3=0) and

(a[I]mod10=4) then

b:=b+1;

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

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

С клавиатуры вводится 8 целых чисел. С цикла for найди количество положительных чисел

▲

С клавиатуры вводится 8 целых чисел. С цикла for найди количество положительных чисел

Ответы

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

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

Email*

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

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

РЕБЯТ НЕ ПОНИМАЮ Необходимо найти значение выражений, используя таблицы истинности логических операцийа)(Av-А)^B A=0 B=1b)A^(AvB)^(Cv-B) a=0, b=1, с=1в)Av-A^B a=1, B=1г) А^BvA^-B a=1, в=0д) (АvB)...

Придумать сказку на тему информатика !

Сделайте , мне надо делать а я в деревне нахожусь не успеваю доделать

Как же будет верно правильно

Вычислить и вынести сумму целых чисел кратных 3 в интервале от 1 до nцикл , , ДО"цикл , , ПОКА"цикл , , ДЛЯ очень

Примеры неправильного использования div и mod

6класс запишите команды для построения: а) квадрата.

Як викликати на виконання підзадачу в середовищі скретч?

2. Составьте программу так, чтобы из слова«Информатика» вышло обратное слово«акитамрофни».

Прошу) заранее ) дана программа: program p1; var a: integer. begin write('введите целое число: '); readln(a); if(a> =100) and (a< 1000)then write(' да') else write(' нет'); end. 1.запишите,...

Чому дорівнює значення х після виконання послідовності присвоювань

С клавиатуры вводится 8 целых чисел. С цикла for найди количество положительных чисел

Ответы

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

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

Email*

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

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

РЕБЯТ НЕ ПОНИМАЮ Необходимо найти значение выражений, используя таблицы истинности логических операцийа)(Av-А)^B A=0 B=1b)A^(AvB)^(Cv-B) a=0, b=1, с=1в)Av-A^B a=1, B=1г) А^BvA^-B a=1, в=0д) (АvB)...

Придумать сказку на тему информатика !

Сделайте , мне надо делать а я в деревне нахожусь не успеваю доделать ​

Как же будет верно правильно

Вычислить и вынести сумму целых чисел кратных 3 в интервале от 1 до nцикл , , ДО"цикл , , ПОКА"цикл , , ДЛЯ очень

Примеры неправильного использования div и mod

6класс запишите команды для построения: а) квадрата.​

Як викликати на виконання підзадачу в середовищі скретч?​

2. Составьте программу так, чтобы из слова«Информатика» вышло обратное слово«акитамрофни».​

Прошу) заранее ) дана программа: program p1; var a: integer. begin write('введите целое число: '); readln(a); if(a&gt; =100) and (a&lt; 1000)then write(' да') else write(' нет'); end. 1.запишите,...

Чому дорівнює значення х після виконання послідовності присвоювань ​

Сделайте , мне надо делать а я в деревне нахожусь не успеваю доделать

6класс запишите команды для построения: а) квадрата.

Як викликати на виконання підзадачу в середовищі скретч?

2. Составьте программу так, чтобы из слова«Информатика» вышло обратное слово«акитамрофни».

Прошу) заранее ) дана программа: program p1; var a: integer. begin write('введите целое число: '); readln(a); if(a> =100) and (a< 1000)then write(' да') else write(' нет'); end. 1.запишите,...

Чому дорівнює значення х після виконання послідовності присвоювань