1.Задан массив А(м) . Напечатать четные по значению среди положительных элементов массива.
2.Найти общее количество нулевых элементов в массивах Х (м) , У (к).
2 задачи
Страница: 1
Сообщений 1 страница 3 из 3
Поделиться12013-11-26 19:28:43
Поделиться22013-11-26 20:04:24
- Серый Сеошник
- Зарегистрирован: 2012-06-14
- Приглашений: 0
- Сообщений: 1134
- Уважение: [+13/-0]
- Позитив: [+15/-0]
- Пол: Мужской
- Провел на форуме:
1 месяц 0 дней - Последний визит:
2016-01-30 15:08:11
1
.......
For i:=1 to n do
if a[i] mod 2 = 0 then write(a[i]);
readl; end.
2
...
for m:=1 to n do
if x[m]=0 then sum:=sum+1;
for k:=1 to n do
if y[k]=0 then sum:=sum+1;
write(sum);
readln;
end.
Поделиться32013-11-26 20:17:40
Спасибо большое))
Страница: 1