//Ввести с клавиатуры массив из 5 элементов , вывести элементы массива делящихся на 5 var a:array[1..5] of integer; i:integer; begin for i:=1 to 5 do readln(a[i]); for i:=1 to 5 do if (a[i] mod 5 = 0) then writeln(a[i]); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку