• Задача: дан массив из 10 элементов, генерированных случайным образом(промежуток от -40 до 60). Вывести все элементы массива, оканчивающиеся на 5 и делящиеся на 15.

    Ребят помогите плиз, очень надо!

Ответы 1

  • program massiv;var a:array[1..10] of integer;i:integer;beginrandomize;for i:=1 to 10 do begina[i]:=random(100)-40;if ((a[i] mod 10)=5)and((a[i] mod 15)=0)then writeln(a[i]) else writeln('òàêèõ ýëåìåíòîâ íåò');end;end.

     

     

     

     

     

     

     

     

     

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years