1. Информатика
  2. Дан массив целых чисел,все

Дан массив целых чисел,все элементы кратные числу 5,заменить на 0.

ler22kya ler22kya    3   19.05.2019 09:00    2

Ответы
snkashleva133 snkashleva133  12.06.2020 13:25

const max = 99;
var a:array[0..max] of integer;
var i:integer;
begin

  randomize;
  for i:=1 to max do
    a[i]:=random(5001);
  for i:=1 to max do begin
    if((a[i] mod 5)=0) then a[i]:=0;
  end;
  for i:=1 to max do
  writeln(a[i]);
  readln;
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
РыжаяЛисичка7 РыжаяЛисичка7  01.07.2019 19:00
Все элементы двумерного массива a размером 10х10 элементов первоначально были равны 0. затем значения элементов меняются с вложенного оператора цикла в представленном...
Irish23 Irish23  01.07.2019 19:00
Жидкокристаллический дисплей на наручных часах показывает 15: 30. а когда эти же 4 цифры в его окошечке были видны хозяину в предыдущий раз? найдите произведение часов...
Adriet Adriet  01.07.2019 17:44
Процедура обработки строки состоит из двух последовательных операций: 1 заменить в строке все символы a на подстроку ab 2 заменить в строке все подстроки bb на символ...
АнютаП1 АнютаП1  01.07.2019 17:29
Написать кодом в visual studio на с++. в одномерном массиве а(10) вычислить сумму элементов массива, отличающихся от максимального на 1....
maryvysotinap08vi8 maryvysotinap08vi8  01.07.2019 17:28
Написать кодом в visual studio на с++. в одномерном массиве а(10) вычислить произведение элементов расположенных после максимального....
OOONIMOOO OOONIMOOO  01.07.2019 17:09
ответы присылать в течении часа, . (язык програмирования - c++) дано цілі додатні числа n і k. використовуючи тільки операції додавання і віднімання, знайти частка від...
odolskij2016 odolskij2016  01.07.2019 19:10
Если в слове а отбросить первые две буквы,то получится слово в.если в слове в заменить одну согласную букву на другую,то получится слово с,а и в-название цифр десятичной...
paolo99 paolo99  01.07.2019 19:20
Вячейке b1 записана формула =2*$a1. какой вид приобретет формула, после того как ячейку b1 скопируют в ячейку с2?...
Níkiskastarling28 Níkiskastarling28  01.07.2019 19:20
Найдите информационный объем слова кодирование если каждый символ введенный с клавиатуры несет в себе 1 байт информации...
лорглролрл лорглролрл  01.07.2019 19:20
Число з трёх разных цифр отняли от числа,что получается с этих самых цифр, перемешанных в обратном порядке. результат получается с этих самых трёх цифр, перемешанных...

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