Найди все четные по значению элементы массива. Вывести на экран значение элементов и их индекс. Ввод элементов массива с клавиатуры. Программа пишется на языке Паскаль
Найди все четные по значению элементы массива. Вывести на экран значение элементов и их индекс. Ввод элементов массива с клавиатуры. Программа пишется на языке Паскаль
Гость
Ответ(ы) на вопрос:
Гостьvar a: array[1..5]of integer; i: integer;
begin
for i := 1 to 5 do
read(a[i]);
for i := 1 to 5 do
if ((a[i] mod 2) = 0) then writeln('число - ',a[i], ' индекс - ',i);
end.
abs pascal
Не нашли ответ?
Похожие вопросы