Предмет: Информатика,
автор: fineas
Написать код программы: Вводим массив из 10 элементов, затем на новой строчке выводим только четные элементы этого массива (используем условие).
Ответы
Автор ответа:
0
//Dev-C++ (C)
#include <stdio.h>
int main(void)
{const int n=10;
int ar[n],i;
i=0;
while(i<n)
{scanf("%d",&ar[i]);
i++;}
i=0;
while(i<n)
{if(ar[i]%2==0)printf("%d ",ar[i]);
i++;}
return 0;
}
//PascalABC.NET 3.2 сборка 1318
Const
n=10;
Var
ar:array[1..n] of integer;
i:integer;
begin
i:=1;
while(i<=n) do
begin
readln(ar[i]);
i:=i+1;
end;
i:=1;
while(i<=n) do
begin
if ar[i] mod 2=0 then write(ar[i],' ');
i:=i+1;
end;
end.
Пример ввода:
1
2
3
4
5
6
7
8
9
0
Пример вывода:
2 4 6 8 0
#include <stdio.h>
int main(void)
{const int n=10;
int ar[n],i;
i=0;
while(i<n)
{scanf("%d",&ar[i]);
i++;}
i=0;
while(i<n)
{if(ar[i]%2==0)printf("%d ",ar[i]);
i++;}
return 0;
}
//PascalABC.NET 3.2 сборка 1318
Const
n=10;
Var
ar:array[1..n] of integer;
i:integer;
begin
i:=1;
while(i<=n) do
begin
readln(ar[i]);
i:=i+1;
end;
i:=1;
while(i<=n) do
begin
if ar[i] mod 2=0 then write(ar[i],' ');
i:=i+1;
end;
end.
Пример ввода:
1
2
3
4
5
6
7
8
9
0
Пример вывода:
2 4 6 8 0
Автор ответа:
0
Спасибо, но вы не знаете как написать эту программу на Паскале? Мы просто это не проходили.
Автор ответа:
0
Хорошо, напишу на Паскале.
Автор ответа:
0
Спасибо) Очень благодарен)
Автор ответа:
0
Готово. Обновите страницу.
Автор ответа:
0
Бесспорно, завтра отмечу ваш ответ как лучший.
Похожие вопросы
Предмет: Геометрия,
автор: Soni221
Предмет: Математика,
автор: danielyanara33
Предмет: Другие предметы,
автор: borovitskiyvadim2793
Предмет: Математика,
автор: aminovaar140804