Schiesakt
6 год назад
Заполнить массив а [1..16] случайными целыми числами в диапазоне от 1 до 20 и вывести на экран элементы массива со значениями, которые не делятся без остатка на 5.
ОТВЕТЫ
Мирон
Jul 25, 2019
......................
На паскале.
var a:array[1..16] of integer;
i:integer;
begin
for i:=1 to 16 do
read(a[i]);
for i:=1 to 16 do
if a[i] mod 5lt;gt;0 then write(a[i], );
end.
var a:array[1..16] of integer;
i:integer;
begin
for i:=1 to 16 do
read(a[i]);
for i:=1 to 16 do
if a[i] mod 5lt;gt;0 then write(a[i], );
end.
243
Смежные вопросы:
