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

21: определить есть ли среди чисел массива числа, делящиеся (кратны) 3, количество элементов до 1000 на промежутке [1000; 3000] 2: определить есть ли среди чисел массива числа, которые при делении остаток 8, количество элементов до 1000 на промежутке [1000; 3000] , надо =3 уже есть некая программа но она чуть непраильна наверно. program qq; const k = 1000; var a: array[1..k] of integer; i,: integer; begin randomize; k: =0; for i: =1 to k do begin a[i]: =random(2001)+1000; write(a[i]: 1); end; if (a[i] mod 3) = 0 then k: =k+1; writeln('количество элемениов кратных 3 - ', k); readln; end.

👇
Ответ:

1.

program qq;

const n = 10;

var a: array[1..n] of integer;

i,k: integer;

begin

randomize;

for i:=1 to n do

begin

a[i]:=random(2001)+1000;

write(a[i],' ');

end;

writeln;

k:=0;

for i:=1 to n do

if a[i] mod 3 = 0 then k:=k+1;

writeln('Количество элемениов кратных 3 - ', k);

readln;

end.

Пример:

2296 2042 2463 2049 1081 2156 2977 1633 1054 1425  

Количество элемениов кратных 3 - 3

2. Определяется количество чисел, которые при делении на 10 дают остаток 8.

program qq;

const n = 10;

var a: array[1..n] of integer;

i,k: integer;

begin

randomize;

for i:=1 to n do

begin

a[i]:=random(2001)+1000;

write(a[i],' ');

end;

writeln;

k:=0;

for i:=1 to n do

if a[i] mod 10 = 8 then k:=k+1;

writeln('k = ', k);

readln;

end.

Пример:

1887 1878 2568 1936 2508 2788 2050 1569 2906 1782  

k = 4

4,4(88 оценок)
Открыть все ответы
Ответ:
AgentElizabeth007
AgentElizabeth007
23.04.2020

1)  В котором  действия выполняются последовательно одна за одной

2) Цикл может выполнятся несколько раз

3) Розгалудження - условия при которых выполняется определенный фрагмент кола. То есть  if else

4) 1. if(если).  if(a==10) writeLine (a)  если условие верно - действие выполняется иначе данный код игнорируется. такое называется "Неповне розгалудження"

   2. if(если)  else(иначе).   if(a==10) writeLine (a)  else writeLine (b)   - если условие верно код выполняется иначе выполняется другой код.

Такое называется "Повнеповне розгалудження"

5) Характерне наявнистю умовы та послидовнистю команд в залежности вид умовы.

6) Линейный выполняется последовательно, а розгалудження дает возможность выбрать какой код будет выполнятся, а какой нет.

7) Розгалудження дает возможность выбрать какой код будет выполнятся, а какой нет. А цикл выполняет код определенное количество раз

Объяснение:

4,4(27 оценок)
Ответ:
roapoaop
roapoaop
23.04.2020

ответ Смотри я не понял вопрос но обЬясню что это такое

Объяснение:

If и else из них составляют условие, а вот or и в этом:

Например

x = int(input())

if x > 0 or x < 10: // если условие x > 0 или x < 10 то                    

выполняется print("Положительное число")//

   print("Положительное число")

else: // иначе//

   print("Отрицательное число")

если бы использовли место or and то получилось бы условие если условие x > 0 и x < 10 то                    

выполняется print("Положительное число")//

4,6(86 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ