Регистрация
ЕвгешаК2003
17.06.2021 08:05
Информатика
Есть ответ 👍

Напистаь программу удаления из строки чётных или нечётных чисел в паскале

209
213
Посмотреть ответы 2

Ответы на вопрос:

Aliy251
Aliy251
4,4(56 оценок)

что значит из строки? формулируйте лучше. можно делать через обычный массив, примерно такvar

  a : array [1..100] of integer; // вместо 100 - максимальное количество чисел

  i, n : integer;

begin

  //если колчисетво чисел вводится, то этот кодread (n);

for i : = 1 to n do

  read (a[i]);

//если же по уловию задана только строка чисел, то использовать следующий  

//код

while not eoln (input) do

begin

  n : = n + 1;

  read (a[n]);

end;

//далее для обоих вариантов.

for i : = 1 to n do

  if a[i] mod 2 = 0 then write (a[i], ' '); //выведет четные, для нечетных заменить = 0 на = 1 

end.

орпавераопрпираоарат
орпавераопрпираоарат
4,4(42 оценок)

var

i,k1,k2: integer;

a[i]: array[1..10] of integer;

begin

for i: =1 to 10 do

read(a[i]);

read(k1,k2);

for i: =k1 to k2 do

write(a[i]);

end.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Популярно: Информатика