Ввести с клавиатуры массив из 5 элементов , вывести элементы массива делящихся на 5. , в паскаль

Erika211 Erika211    2   19.09.2019 14:00    0

Ответы
DImonist DImonist  08.10.2020 02:22
//PascalABC.NET
//Версия 3.3, сборка 1634
begin
ReadArrInteger(5).Where(x->x mod 5=0).Println;
end.
ПОКАЗАТЬ ОТВЕТЫ
kvastalkerr kvastalkerr  08.10.2020 02:22
//Ввести с клавиатуры массив из 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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика