Вопрос по информатике:
Дан массив p[12],заполненный с клавиатуры. Все элементы кратные 3 и удовлетворяющие условию, -10≤p[i]≤15 заменить на нуль.
- 27.12.2017 05:50
- Информатика
- remove_red_eye 4004
- thumb_up 14
Ответы и объяснения 1
Program asd; const n=12;
Var k,i:integer; p:array[1..n] of integer;
Begin k:=0;
For i:=1to n do
read (p[i]);
For i:=1 to n do begin
If (p[i] mod 3=0) and (p[i]>=-10) and (p[i]<=15) then p[i]:=0;
write(p[i]);end;
End.
- 28.12.2017 19:41
- thumb_up 2
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.