1. Информатика
  2. Дан фрагмент программы. for

Дан фрагмент программы. for i: = to n if (a[i] mod 5=0) and (a[i]< > 0) then kol: =kol+1; после его выполнения значение переменной kol равно: 1)количеству элементов массива а, кратных 5 2)количеству нулевых элементов массива а, кратных 5 3)количеству нулевых элементов массива а 4)количеству элементов массивам а

alinakat98 alinakat98    3   04.10.2019 17:10    1

Ответы
adadov12345 adadov12345  09.10.2020 20:04

На алгоритмическом языке оператор ветвления означает следующее:

ЕСЛИ остаток от деления A[i] на 5 равен 0 И A[i] не равно 0, то увеличить kol на 1.

Соответственно, правильный ответ: 1.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
дтш дтш  13.07.2019 08:00
Текст длиной 49152 стмолов закодирован с алфавита, содержащего 2048 символов.сколько килобайт занимает в памяти этот текст?...
M1N1G4M3R1 M1N1G4M3R1  13.07.2019 08:00
Решите в pascal 1. составьте программу, которая печатает таблицу перевода расстояний из дюймов в сантиметры (1 дюйм = 2,5 см) для значений длин от 1 до 20 дюймов....
Klimovada Klimovada  13.07.2019 08:00
Кто-нибудь делал рисунки новогодние на паскалях? ?...
kato99 kato99  13.07.2019 08:00
Назовите раздел в котором объявляется перемены. как записывается перемены в этом разделе? информатика...
ФамилГасанов ФамилГасанов  13.07.2019 08:00
Перевести данное число из десятичной системы счисления в двоичную, восьмеричную и шестнадцатеричную системы счисления. а) 164(10); б) 255(10); в) 712,25(10); г) 670,25(10); д)11,89(10)...
Maximus20161 Maximus20161  11.02.2021 01:54
задан массив состоящий из 10 элементов сформировать два массива по 5 элементов каждый включая в первый элементы исходного массива с чётными индексами а во второй с нечётными.сделайте...
2312YQw 2312YQw  11.02.2021 02:56
Текст вопроса Чему равен 1 Кбайт? ... a.1000 бит b.103 байт c.210 байт Текст вопроса В почтовом адресе [email protected] в сети Internet первое слово “ROBOT” a.адрес компьютера b.имя...
Pleshkova01 Pleshkova01  11.02.2021 03:49
Что будет выведено на экран в результате выполнения программы Write( 50/2= ,50/20);End.очень нужно, заранее...
serbakovm888 serbakovm888  11.07.2019 00:40
Даны 3 числа.если выполняется неравенство a,b,c, то напечатайте значение суммы, а иначе произведение чисел....
esbolat2000 esbolat2000  08.04.2019 13:02
Найти информационный объём сообщения записанного на 6 страницах на каждой странице по 16 строк а на каждой строке 8 символов и используется 16 битная кодировка...

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